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Editorial 

Na Feira de Informatica, realizada no 
m£s passado em Sao Paulo, foram vistas 
coisas interessantes, ridfculas, opacase 
brilhantes. Duas, por£m. foram altamente 
preocupantes: a pressao que a IBM e a HP 
estao exercendo para entrar no mercado 
brasileiro de micros. Esta pressao esta 
sendo feita com a sutileza de uma revoada 
de hipopdtamos, ou seja, esta ai para 
quern quer ou nao vfi-la. Isto nos faz 
ref let ir um pouco sobre a reserva de 
mercado na £rea de micros e sobre sua 
validade. 

Existem fortissimos argumentos 
contra esta reserva de mercado, mas por 
outro lado nao faltam argumentos a 
favor, alguns dos quais at£ meramente 
emotivos mas nao por isso menos v^lidos. 

O prdprio fato de ver o Roberto 
Campos (Bob Fields) lanpar invectivas 
contra esta reserva de mercado ja fez 
muitos brasileiros conscientes se 
posicionarem a favor da mesma. 

De qualquer forma 6 um assunto que 
merece muita ponderagao e que nao 
pode, de forma alguma, ser resolvido por 
uma irrespons^vel penada palaciana. 

Qual deve ser a posipao do usu^rio 
numa situapao destas? 

Ora, o que o leitor acharia de poder 
comprar um 6timo automdvel japonGs 
pela metade do prego do mais barato 
carro brasileiro? Perspective tentadora 
nao? 

Agora o que este mesmo leitor acha 
que aconteceria com a j2 semi-falida 
economia brasileira se abrissemos a livre 
importagao de carros estrangeiros? 

Est3 portanto na hora de tomarmos 
consciSncia que a economia brasileira nao 
6 uma abstragao: a economia brasileira 
somos n6s! E se n6s nao cuidarmos do 
que 6 nosso, fatalmente efetivar-se-3 de 
maneira definitive o estado de 
semi-colonia em que j2 nos enfiaram. 
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Pierluigi Piazzi e Equipe, 

Venho por meio desta parabeniz^-los pela conceituada revista 
Microhobby, que tem, j£ de im'cio, feito por merecer um grande 
elogio de nossa parte - os TKmgm'acos — , tanto pela beleza do 
material como pela preocupagao em oferecer-nos o melhor mate- 
rial de cunho dktetico. 

Continuem assim pois 6 disso que n6s, TKmam'acos, estamos 
precisando: uma revista estruturada como a Microhobby. 

Gostaria tamb^m de aproveitar a oportunidade para tirar um 
"grilo" no programa Genius. Neste programa, notei uma novidade 
(pelo menos para mim), a utilizagao de v^rios INKEY$ ao inv^s 
de INPUT, por exemplo: 



1130 POKE 164-37,255 
114-0 PAUSE 30030 
1150 LET I $ = INKEY $ 
1160 IF OR !$>' 

TO 1130 



THEN GO 



Agora pergunto: "Ser3 que, seao inv^sde LET T$ = INKEY$, 
fosse utilizado INPUT 1$ na linha 1 150, mudaria alguma coisa? " 
— "E nas linhas 1490, 1730, o que poderia acontecer ao pro- 
grama?". 

Fico aguardando uma resposta e gostaria tamb^m de trocar 
id6ias com outros assinantes, atrav^s do envio de cartas, -para 
mim, no seguinte enderego: Marco AurSlio — Avenida Afonso 
Pena , 1 55 7/21 4 -B — Centro — Campo Grande - CEP 79100 - 
Campo Grande, MS. 

Caro Marco AurSlio, 

Gratos pe/os para bS ns a Microhobby. A melhor forma de res- 
ponder sua duvida S a seguinte: 

Substitua as linhas 1 150 , 1490 e 1730 por INPUT /$ e verifi- 
que por sf, qua / o resu/tado. 

Como achamos que vocS nao deve gostar de nossa "melhor res- 
posta ", the adiantamos que ocorrerS mudanga, muito pequena, 
pois enquanto INPUT aguarda a digitagao de uma ou mais tecias 
seguida(s) de NEW LINE, IN KEYS aguarda a digitagao de uma 
unica tec/a. Daf, em programas como Genius preferir-se IN KEYS 
a INPUT (pelo menos por economia e rapidez). 



Prezados Senhores, 

Possuo um TK82-C e venho tendo problemas com ele, pois, 
quando estou digitando um programa, ap6s determinado tempo, 
comega a haver troca de caracteres de numeros de comando e, 
quando tento corrigi'-los a imagem na tela desaparece sendo que, a 
unica maneira de recuperate 6 desligando o micro (e perder o pro- 
grama que estava sendo digitado). 

Gostaria de saber se esse comportamento 6 comum, se for, que 



posso fazer para evite-lo; se nao, que posso fazer para corrigi-lo. 

Derrel H. Santee - Brasilia, DE. 

Caro Derrel , 

De modo a /gum esse comportamento de seu TK pode ser con - 
siderado "normal". VocS deve encaminhS-lo a Microdigital para 
ser reparado. ~ 



Prezados Senhores, 

Sou usu^rio do TK-82C a seis meses e assinante da revista 
Microhobby, a qual tenho acompanhado com crescente interesse 
pelos artigos e dicas que apresenta. 

Tenho por6m uma questao a propor que, no meu entender, 
dever2 auxiliar di versos usu^rios e se relaciona com o controlador 
de jogos e seu interfaceamento com os TKs. 

Ao comprar o controlador e interface^-lo com o TK-82C, notei 
que o botao de disparo nao funcionava; ao pedir informagoes a 
um revendedor, este esclareceu que alguns modelos nao estavam 
adaptados. 

Gostaria que a revista publicasse alguma materia sobre o assun- 
to e se possfvel, como fazer a adaptagao para aqueles que j3 estao 
fora do peri'odo de garantia. 

Alvaro G.S. Bar cellos - Icarai - Niterdi, RJ. 

Caro Alvaro, 

De fato,os primeiros micros TK-82 que surgiram no mercado 
nao per mi tem o perfeito funcionamento do "Joystick". Para 
adapta-lo, vocS deve procurer alguma oficina especializada ou en- 
via-lo a Microdigital. Quanto a pub! i cacao de matSria a respeito 
em nossa revista, tera a devida atengao e serS submetida a aprecia - 
gao de nosso editor, podendo ou nao ser publicada. 



Prezados Senhores, 

Gostaria que me respondessem uma pergunta: "Me parece que, 
comegando a gravagao de um programa que tenha na primeira 
linha uma instrugao DIM acontecem problemas. Ser£ que 6 o meu 
TK ou isto acontece em todos os TKs?"' 

Eduardo Henrique Oliveira — Sao Paulo, SP. 

Caro Eduardo, 

A gravagao de um programa do TK para fita deverS ocorrer 
normal mente, in depen den te men te do que esteja na primeira lirrha 
do programa. Se com seu micro isso nao ocorrer, sinal de que ele 
So "diferente". 

Junto com a carta, vocS nos enviou a resposta (correta) do 
Quebra-Cabega Verdadeiro ou Falso e perguntou-nos tambSm, se 
a oitava assergao foi bem traduzida. VocS tem nosso parabSns, 
pois a resposta S sim e essa nos pareceu a assergao de tradugao 
menos evidente. ^ 
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Prezados Senhores, 

Como assinante desta revista s6 posso elogte-los. Esta engros- 
sando a cada numero e mesmo que aumente minha maquin^ria, 
jamais deixarei de assin^-la, pois jamais venderei meu TK. 

Mas, tenho uma duvida: "que estbria 4 essa de teclado musical 
para o TK? E ainda como posso fazer meu TK fazer "beep", 
"beep" (bip = sinal sonoro)?" 

Outra coisa: poderei, um dia, adapt^-lo para telefone,a fim de 
saber minha conta banc2ria, etc? 

Sou m&iico-anestesista e gostaria de trocar (comprar. tambdml 
programas na 3rea. Escrevam, colegas. Dr. Roberto Araujo - 
R. Uruguay , 205 , apto. 803 - CEP 20510 - Rio de Janeiro , RJ. 

Caro Dr. Roberto , 

Antes de mais nada, obrigado pel os elogios. 

O "teclado musical para o TK" nada mais e que um programa 
que faz com que algumas tec! as, quando digitadas, produzam sons 
seme/hantes a notas musicais. Quanto aos "beep's" e as "interfa- 
ces" para tele f one, podem ser conseguidos at raves de peri f4ri cos 
do tipo das TKPLAK's (vide n9 3 de MicrohobbyA 



Prezados Senhores, 

Tenho acompanhado a Microhobby desde o seu langamento, e 
gostaria de parabeniz^-los pela maneira objetiva e didatica utiliza- 
da em todas as matdrias, que permite aos leigos como eu, um 
acompanhamento integral dos assuntos abordados. 

Eu tenho algumas duvidas que talvez vocfis pudessem esclare* 
cer. Sao elas: 

1 . Os perifdricos existentes no mercado ingISs e outros para os 
ZX's (tipo Memotech, etc.) sao, eletronicamente, totalmente 
compati'veis com os TK's? 

2. Na edigao n9 3 de Microhobby, na sepao "Novidades" vo- 
c£s apresentaram o TPLAK, mas nao o nome do fabricante, co- 
mo, quando e por quanto se pode adquiri'-lo. Gostaria de ter 
maiores informapoes a respeito. 

3. Ao converter para fita alguns programas editados em revis- 
tas nacionais e estrangeiras, costumo fazer incrementagoes nos 
mesmos, para tornd-los mais interessantes - geralmente nos pro- 
gramas "Aplicativos". Minha pergunta 4 a seguinte: VocSsaceita- 
riam como colaborapao estes "Programas Modificados". embora, 
a base seja de um outro programador (que nem eu mesmo conhe- 
po) e editado em outra revista? 

4. Gostaria de saber se 6 do conhecimento de vocSs o langa- 
mento do microcomputador a cores, acessivel em prepo como foi 
o TK, por parte da Microdigital? 

Desde \4, grato por este papo e por suas possi'veis respostas. 

Armando C.F. Pi res dos Reis - Rio de Janeiro, RJ. 
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Caro Armando, 

Suas duvidas sao bem simples e acreditamos que a 2? e a 4? jJ 
foram respond idas na ediqao n9 5 de Microhobby. Abaixo 
respondemos as demais: 

19 — Todos os peri feri cos para os ZX's que conhecemos sao 
eletronicamente compati'veis com o TK. De qualquer modo, 4 
bom que antes de adquin'-los voce procure conhece-los bem. 

39 — Temos como certo que nada se cria a partir do nada. 
Obviamente se os programas "originais" forem incrementados ou 
modificados o suficiente para serem diferentes dos originais, e/es 
nao serao mais simples cdpias, mas sim outros programas "origi- 
nais". Nesse caso, nds os aceitaremos com muito prazer, desde 
que voce nos indique a origem do programa "original", ou seja, 
o nome da pub/icagao de onde ele foi extraido e tamb4m do 
autor, se houver. q 

Prezados Senhores, 

Estou tentando ser autodidata em meu TK-82 (sem expan* 
sao, sem SLOW) nas horas vagas. Foi com satisfagao que recebi a 
fita da Microhobby, por6m nao consigo rodar o programa da 
Pu/ga 

1 . Este problema ocorre em fungao do SLOW? 

2. Sera .que poderiam enviar-me a listagem correta para que 
possa checar? 

3. Algumas instrupoes me sao muito estranhas: por exemplo 
na linha 25 LET A$ = "H" + A$ (T031), que tipo dedefini- 
gao a essa? 0 manual da maquina nao me auxiliou muito. 

4. Quero meaprofundar (iniciar) com PEEK, POKE e USR. J£ 
ha alguma publicagao da Micromega a disposipao? 

Francisco Jos4 Pall - Sao Paulo, SP. 

Caro Francisco, 

£ muito bom voce tentar aprender sozinho a "conversar" com 
seu TK. Essa 4, em nossa opiniao, a melhor forma que h4 para is - 
so. Claro que, quando surgem duvidas as quais nao se tern tempo 
ou paciencia para esc/arec4-las, 4 conveniente procurar auxilio. 

Respondemos, agora, sua primeira, segunda e quarta duvidas. 

A terceira sera respond! da na segao Desgrilando. 

1) Certamente, sim. Para amenizar o problema, retire a linha: 

S S!_OU 

e introduza: PAUSE £0 

51 PAUSE £0 
76 PAUSE £0 

2) Com estas modificapoes, seu programa rodara perfeitamen- 
te. A listagem torna-se desnecessaria, uma vez que o programa que 
enviamos na sua fita-brinde esta correto. 

4) O livro de Flavio Rossini, Linguagem de Maquina para o 
TK, 4 o que indicamos para o seu caso, bem como de outros leito- 
res que desejam conhecer este novo campo de aplicaqoes para o 
seu computador. q 
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DESGRILANDO 



Prezados Senhores, 

Parabenizo voc6s por esta 6tima revista, que esta me ensinando 
o Z80 e aumentando o meu conhecimento sobre o BASIC. 

Acho muito interessante a sepao Dicas e gostaria de mais uma: 
"Cqmo 6 que coloca a linha zero" que, em certos casos, tem o no* 
me do autor do programa e nunca pode ser retirada. Grato pela 
atenpao. 

Edson Moreira Menezes — Aracaju, SE 

Caro Edson , 

Obrigado pe/os paraMns. 

VocS nos perguntou como se introduz uma "linha 0", isso £ 
muito simples. Digite a linha: 



1 FOR N=0 TO 255 

2 PRINT CHR$ N; 

3 NEXT N 




Rodeo e veja o que ocorre. 

Tente apagar a linha que "imp rime" sua marca sem apagar o 
programa. 

Provavelmente vocS nao conseguira\ 

Pode-se , ainda , substituir o numero 63 em 

POKE 16509,63 



X REM "MICROHOBBY" 



por quafquer outro numero entre 40 e 64 (inc/usos). 



Agora digite (sem numero de linha): 

POKE 16510,0 

CE 2 UEZE5 NEU LINE) 

A i esta a sua linha 0 ! 

Se quiser muds la para i reh "hicrohobby- novamente , bas 
ta fa'zer poke ibsi«,i ce neu lino 

Ao contrdrio do que muitos pensam, a principal utilidade de 
uma linha • rew . . . nao 4 "gravar" nomes, marcas ou ti'tufos, 
mas sim subrotinas em linguagem de mdquina. Muitas vezes essas 
I in has ao serem trazidas para a parte inferior da tela com EDIT , 
se auto-destroem parcia/mente (veja a segao Desgrilando de Micro- 
hobby nP 5). Colocando-as na linha o rew . . . evita-se editJ- 
las acidentalmente. 

Se voce estd interessado em colocar uma "marca" sua num 
programa, existem metodos bem mais eficientes. Como por exem- 
pt o, digite: 



Trecho da carta de Francisco Jos4 Pall, pub/icada na seqao 
Carta dos Leitores deste numero: 

"Algumas instru^oes me sao muito estranhas: por exemplo 
na linha 25 

LET +R$( TO 31) 

que tipo de defini^ao 6 essa ? 0 manual da rrrfquina nao me auxi - 
liou muito. 

Caro Francisco, 

Na linha 

LET fl$= M B"+R$( TO 31) 



1 PRINT RT 20. O 



N3ME 




estd se atualizando o "string" AS. A partir dessa linha, eta tera co- 
mo primeiro caractere o espaqo reverso, e como caracteres subse- 
quentes, todos os outros que ela possuia, at6 o 319. 

Para que isso fique daro, digite as linhas a seguir e "rode-as": 



Apds isso, digite direto: 



POKE 16500,63 CE NEU LINE) 



e um programa qua/quer, por exemplo: 

1 FOR N=0 TO 255 

2 PRINT CHR % N; 

3 NEXT N 

A sua listagem agora de ve ser: 



10 LET R* = "RBCDEFGHIcJ" 

20 PRINT 

30 PRINT RT 2,0; *'R$ ( 1 TO 5>="; 
n$(l TO 5) 

4-0 PRINT RT 4- , 0; "R$ < TO 5)=";R 
$ ( TO 5) 

50 PRINT RT 6,0; U R$(6 TO 10)=" 
; R$ (6 TO 10) 

60 PRINT RT 8,0; "R$ (6 TO )=";R 
% (6 TO ) 

70 PRINT RT 10,0; ”R$(4- TO 7) =" 
; R $ (4 TO 7) 
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Como vocS pode notar pela imagem na tela (figura) a expres- 
sao AS (1 TO 5) 4 a mesma que >4$ (T05 ) e >4$ ( 6T010 ) S a mes- 
ma que >4$ (6T0). Expert mente mudar os numeros dentro dos pa- 
rSnteses e verifique os vdrios casos posstveis. 

Cada expressao 4$ fmTOn) — onde men sao numeros natu- 
ral's — S uma sub-string ou slicing da string >4$. Nessa slicing, o pri- 
meiro caractere S o m-Ssimo e/emento da string AS e o ultimo ca- 
ractere S o n Ssimo elemento da string >4$. 

Na /in ha 

LET ft$ = , l”+R5 (1 TO 31) 

esttf se fazendo uma "concatenaqao" (jungao ou uniao) de duas 
strings. A primeira S constitufda apenas pelo caractere " Hi " e 
a segunda S uma slicing que possui do 19 ao 319 elemento de A$. 

Acrescente ao programinha anterior as linhas adiante: 

80HLET R$=”H”+R$ < TO 9) 

90 PR USE 180 
100 GOTO 20 

Rodeo e veja o que acontece. Quando o micro IS pela primeira 
vez a linha 80 ele atualiza a string 



R$ = # 'RBCDEFGHIU" 

para 

R % ss •IflBCDEFGHI- 

Da linha 100 ele retorna a linha 20 e refaz a tela. Ao passar pe- 
la segunda vez pela linha 80, atualiza nova men te >4$. 

Assim, apds ler 10 vezes a linha 80, teremos: 

R* = "■■■■■1" 

Para final izar , expert mente rodar o programinha mostrado a 
seguir. 

Ele faz sua string "girar". 

Procure en tender como. 

i0 let r$- %> b ■ m m m m m m *•" 

20 PRINT RT 12,6; R$ 

30 LET R$=R$ (IS) ( TO 17) 

4.0 GOTO 20 



ERROS DE IMPRESSAO DO LIVRO 
LINGUAGEM DE MAQUINA PARA O TK 
VOLUME I 



Infelizmente, no livro "Linguagem de MSquina para o TK", 
alguns erros de impressao passaram despercebidos, o que torna 
aparentemente sem sentido algumas passagens. Devido a impos- 
sibilidade pr^tica de se adicionar uma "errata" ao livro, vou publi- 
car aqui na Microhobby os erros, contando com a colaboragao de 
vocfis para que os divulguem para quern o possui. Obviamente nao 
mencionarei erros "supbrfluos" como, por exemplo, a troca de 
uma letra minuscula por maiuscula. 

Na p£gina 70 temos o programa 4.8 que, aparentemente, nao 
tern I6gica. Basta modificar as seguintes linhas: 

3065 IF INKEY$ = M,t THEN GOTO 3065 

3075 IF B =23 THEN LET B = 1 

3085 IF C=0 THEN LET C=22 

3095 IF B$ = “6-' THEN PRINT RT 0jU 

SR 30000; R$ (C) 

4000 IF B$ = "7*' THEN PRINT RT 21, 

U5R 31000; R $ (B) 

4015 GOTO 3065 

Na pSgina 91 na figura 5.6 os bytes na membria sao, respecti- 
vamente, '39' (e nao '94') e '75'; de fato, o CALL coloca no topo 
da pilha o enderego de retorno da subrotina, ou seja, 30009 

(= '7539') que corresponde a primeira instrugao INC HL. 

Na p^gina 127, no programa 8.2, falta uma aspa (") na linha 
120 : 

120, PRINT ”E RGORR U OU HE RUTOD 

ESTRUIR" , "RDEU5 . . , SNIFF . . . SNIFF . 
•• 

m m 

Na p^gina 148, no programa 9.2 a terceira linha estS deslocada 
para a direita! De fato, LOOP S urn label. 

Na pagina 149 a linha 2075 deve ser substitui'da: 

2075 GOTO 2050 

Na pagina 159, na 10? linha a palavra absoluto deve ser substi- 



Flavio Rossini 

tuida por a/eatdrio. 

Na pagina 172, o final da 3? linha deve ser substitui'da por 
"ao programa 10 4". 

Finalmente no capi'tulo 11 todas as referfincias a figuras nas 
paginas 184 e 185 devem ser acrescidas de 3 unidades; por exem- 
plo: figura 1 1 .3 -M 1 .6. (Na figura 1 1 .6 o numero 4300 deve ser 
retirado). 

Pego a comprcensao de todos vocbs e procurarei me esforgar 
ao maxi mo para que o segundo volume do livro saia o mais perfei- 
to possfvel, exigindo uma revisao mais rigorosa por parte da Edi- 
tora Moderna. Ele devera ser langado nos primeiros meses de 
1984 e tera como objetivos principals: 

- finalizar as explicagoes quanto as instrugoes do Z80 (p. ex.: 
DAA, RLD, IN, OUT, El, etc.) 

- explicar e apresentar os programas ASSEMBLER e DI- 
SASSEMBLER (&MONITOR), e utilizar os mesmos para colocar 
programas complexos (por exemplo, jogos) no TK e estuda-los. 
Portanto, utilizarei os programas produzidos pela MULT ISO FT 
que ja se encontram no mercado. 

- explicar detalhadamente a estrutu.a da ROM, abordando todos 
os comandos em BASIC e inclusive as rotinas de floating point, 
para podermos utilizar as subrotinas da ROM nos nossos pro- 
gramas. 

- dar uma nogao de hardware, explicando suscintamente como S 
a arquitetura interna do TK, atrav^s do estudo do funcionamento 
do Z80. 

Espero que meu esforgo em escrever esses livros sirva para su- 
prir a curiosidade e vontade de aprender de todos voc6s que, co- 
mo eu, "curtem" muito o TK. 

De qualquer modo, coloco-me a disposigao para esclarecer, 
por carta, qualquer duvida eventual que vocfis possam ter. Basta 
escrever para a MICROMEG A numa carta enderegada ao "Depar- 
tamento de Assessoria Tbcnica - at. prof. Flavio Rossini". 
Procurarei responder todas as cartas no menor tempo possi'vel e, 
caso houver muitas duvidas "comuns", o esclarecimento sera 
publicado na revista na segao "Desgrilando". 

Mais uma vez, obrigado pela atengao. 
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1 . O estande da Micromega e o famoso gorila 



Durante uma semana consecutiva o es- 
paco formado pelo Parque Anhembi e o 
Palacio das Convenpoes foi frequentado 
por uma quantidade de pessoas estimadas 
em aproximadamente 300 mil. O publico 
presente ao Congresso e a Feira supera- 
ram os numeros calculados por seus orga- 
nizadores. Vieram crianpas com seus pais, 
estudantes, especialistas da 3rea, intelec- 
tuais, diversas autoridades politicas de 
dentro e fora do pai's todos interes 
sados com o futuro da inform^tica no 
Brasil 

Estiveram presentes na feira, cerca de 
319 expositores num total de 260 estan- 
desdistribuidosnos2? mil m 2 do Anhem- 
bi. 0 Congresso recebeu 5 mil congres- 
sistas, foram apresentados 120 trabalhos 
tbcnicos - 25 do exterior - teve seis mil 
pessoas inscritas sendo 2.400 estudantes 
(200 da America Latina). 

Este evento por sua dimensao interna- 
cional e m'vel de frequbncia di^ria tornou- 
se o acontecimento de maior destaque, 
senao nacional, pelo menos a m'vel esta- 
dual. 

Albm do Congresso e da Feira, montou- 
se um circo informatico ao lado do Pala- 
cio das Convenpoes com o objetivo de tra- 
zer as crianpas na faixa de 12 a 16 anos, 
para conhecerem um computador. No 
meio do circo, estava o picadeiro com o 
palhapo Abracadabra animando cerca de 
400 crianpas trazidas de oito escolas dife- 
rentes, juntamente com os computadores 
M-LOGO cedidos pela Unitron. As crian- 
pas maravilhadas, divertiram-se durante os 
cinco dias de funcionamento do circo, 
trapando figuras geom^tricas e funpoes 
trigonom^tricas na tela dos computadores. 

O tema predominante em todas as pa- 
lestras no Congresso e nas converses entre 
empres2rios e visitantes de diversos esta- 
dos e pai'ses, na feira, giraram em torno da 
tao afamada poh'tica de reserva de merca- 
do trapada pelo governo federal. 

Logo de ini'cio, na abertura do Info/83 
realizada em sessao solene no Palacio das 
Convenpoes, presidida pelo ministro Dani- 
lo Venturini e contando com a presenpa 
de diversas autoridades. entre elas o secre- 
tario da Industrie, Cibncia e Tecnologia 
do Estado de Sao Paulo, Einar Kok, o 
ponto central dos discursos foi a neces- 
sidade do Pais obter capacitapao tecnolo- 
gica e domrnio das tbcnicas empregadas. 

A pressao exercida por multinacionais 
presentes na Feira, foi outro ponto que 
demonstrou a necessidade da preservapao 
de mercado. Vontade 6 que nao falta, por 
parte de multis, em penetrarem neste 
mercado, como por exemplo a IBM que 
este ano trouxe a feira, todo seu poten- 
cial tecnoldgico, baseado numa tremenda 
campanha publicit^ria em torno da cha- 
mada "Tecnologia, Aqui, Agora e para o 



Futuro". 

Em contrapartida o Info/83 serviu, 
tambbm, para chamar a atenpao para 
outros pontos que merecem ser ressalta- 
dos, como, por exemplo, procura de uma 
forma de associapao entre empresas nacio- 
nais e internacionais, atravbs, por exem- 
plo, de ""Joint-Venturi" — , uma proposta 
dada pelo ministro Camilo Penna. 

Desta vez, o objetivo dos organizado- 
res do evento foi alcanpado, afinal, a fre- 
qufincia, ao menos na feira , superou as ex- 
pectativas e desta vez, a popularizapao do 
computador foi algo concretizado. Esta 
popularizapao ir3 ampliar o mercado, ge- 
rando sua prdpria transformapao. 



Outro fator demonstrado, 6 que o po- 
vo — ao menos desta vez -, apoia uma 
das medidas econb micas adotadas pelo 
governo federal. Em todos os dias perce- 
beu se que, todos os setores da sociedade, 
atravbs de manifestapoes em jornais e de- 
poimentos emitidos, estao totalmente fa- 
vor^veis a poh'tica de reserva de mercado. 

A Feira 

A feira de Inform^tica deste ano pode- 
ria ter como chamada o seguinte: "Venha 
a Disneyworld da Inform^tica Brasilei- 
ra! Foi um verdadeiro festival de atra- 
poes multiplas. 
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tos, pastinhas, sacolinhas, broches, folhe- 
tos explicativos, adesivos, papeizinhos pa- 
ra concorrer a sorteios de micros, albm de 
ir vislumbrando mogas bonitas sorrindo 
graciosamente sempre presentes nos 
estandes. 

Conforme a distribuigao da feira os 
grandes estandes ficaram concentrados no 
final. L3 estavam a Cobra, IBM, Xerox, 
Sisco, Scopus, Prolbgica, SID-Sharp, 
Elebra, Labo, Dismac, Itautec, antecedi- 
dos de outros menores, mas que marca- 
ram sua presenga tanto em termos de fre- 
quSncia de publico, como em apresenta- 
gao de novidades. Urn destes estandes foi 
o da Microdigital fixada nas proximidades 
dos estandes da Poly max, Sysdata, Ritas e 
Unitron entre outros que, com seu estan- 
de vermelho e preto, marcou presenpa du- 
rante toda a feira. Distribuindo micros e 
coca-cola todas as noites, al6m de recep- 
cionistas vestidas de prata que colavam 
adesivos em todos os que passavam pelo 
estande. a Microdigital expos seus TKs, 
com forpa, lanpou seu videogame — o 
"Onyx'* — e apresentou ao publico, dois 
protbtipos do TK-2000 color. 

A Xerox distribuia cbpias ampliadas de 
Charles Chaplin enquanto a Nashua co- 
pias do Cebolinha e da Monica. 

Quern chegasse ao final da feira se de- 
frontava com dois chamativos estandes. 
0 primeiro por sua suntuosidade — o da 
IBM e o segundo — o da SISCO, por sua 
iluminagao e urn detalhe bem chamativo: 
o som de urn foguete decolando. A SISCO 
trouxe ao Anhembi seu estande ilumina- 
do com f ios de neon montado com a mes- 
ma concepgao que o estande da IBM: "tu- 
nel do tempo" Uma gravagao com o som 
do foguete Saturne decolando era aciona- 
da de 15 em 15 minutos juntamente com 
uma voz computadorizada que dizia: 
SISCO! SISCO!. . . Este som fbz os ouvi- 
dos ao lado tremerem, forgando a SISCO 
diminuir o som, e a expandir o tempo de 
acionamento da "simp^tica" voz. 

Albm do som interessante, a SISCO 
trouxe 12 lanpamentos na 2rea de micros 
para apresentar na feira, entre estes, o 
MS-800 ou "grilo" com 128kByte e me- 
mbria RAM. 

0 vizinho da SISCO - a IBM - foi o 
centro das atengoes de toda a feira. Seu 
estande — o maior — , com 960 m 2 mais 
os 200 metros adicionais onde ficaram os 
CPU's, foi criado em cima do logotipo 
"Tecnologia, Aqui, Agora e para o Futu- 
ro". La, foram distribuidos 100 mil sacos 
de pipocas, 20 mil baloes e 20 mil cata- 
ventos albm dos interessantes e concor- 
ridos broches onde se via a figura de 
Charles Chaplin "mexendo" num compu- 
tador. 

Montado estrategicamente no final da 
feira no percurso onde todo visitante era 



a Feira e o Congresso 

Ana Lucia da Alcintara 



Logo na entrada o visitante se defron- 
tava com alguns computadores cedidos 
pela Itautec colhendo informagoes com o 
objetivo de tragar, em seguida, o perfU do 
visitante. Uma coisa difi'cil de ser conse- 
guida, pois o publico ali presente foi bem 
variado. 

A feira esteve distribui'da em setores: 
I microcomputadores, microprocessadores, 
I videogames, suprimentos e perifbricos, 
I software, servigos, telecomunicagdes, co- 
mercio, copiadoras, m^quinas de escritb- 
rios. instrumentos e mobilterios e univer- 
sidades. 

Penetrando no enorme pavilhao do 
Anhembi, o visitante via, de imediato, os 



estandes da Prodam, fornecendo informa- 
goes sobre turismo e lazer e o de artes 
computacionais expondo obras de artes 
feitas em computador. Neste estande esta- 
vam algumas empresas fornecedoras de 
servigos de video texto, como a Editora 
Nobel com seu servigo "Arte on Line" e a 
Intergraph Sistemas apresentando obras 
de varios artistas. 

Apreciando as maravilhas apresenta- 
das, o visitante assustava-se, de cara, com 
a enorme quantidade de pessoas que pas- 
seavam ou brincavam nos computadores 
espalhados nos diversos estandes. Andan- 
do pelas ruas de A a Z este mesmo visitan- 
te ia recebendo bexigas, pipocas, cataven- 
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2 O tunel no estande da IBM 



obrigado a passar, a IBM trouxedos EUA 
especialmente para a feira, maquinas que 
nao podem ser comercializadas no Brasil 
- gragas a reserva de mercado - como 
um terminal de painel a gas, o robb indus- 
trial 4281 e 12 micros PCs, que estavam 
abertos para demonstragao. 

Em contrapartida a pressao da IBM, la 
estava o estande preto da Prolbgica mon- 
tado em cima do logotipo: "Reserva de 
Mercado — Defesa de valores nacionais". 
Tambbm distribuindo brochinhos onde se 
via o logotipo de sua campanha publici- 
t6ria, a Prolbgica trouxe a feira a versao 
modular de seu microcomputador Siste- 
ma-700, as impressoras P-740 e Qualitat 
al6m dos CP's com som est6reo e joy 
control, programados com jogos eletrbni- 
cos expostos para usufruto dos sediosos e 
curiosos visitantes. 

A SID (dando destaque ao multi- 
processor - chamado Sistema 8 e o con- 
centrador 3510) foi um dosestandes, jun- 
tamente com: a SCOPUS que trouxe o 
Nexus 1600, a Softec com o "Ego" e a 
Itautec com o micro "Junior", que esti- 
veram em termos de tamanho e frequSn- 
cia de publico, no mesmo porte que o da 
Prolbgica. 

A grande vedete a 16m dos grandes es- 
tandes, foram realmente os microcompu- 
tadores. As grandes novidades estiveram 
nesta 6rea albm, 6 Ibgico, dos videogames, 
que tiveram a maior receptividade por 
parte da garotada. 

O TK-83 da Microdigital, o TK-2000 
color, o micro 8221 da Labo, o Fox da 
Brascom, o Ap II para monitor colorido 
da Unitron, o Poly 150 WP um micro vol- 
tado ao processamento de textos, da 
Polymax, o Alpha 2064 MH destinado a 
trabalhos em redes e o D8100 com satda 
para TV a cores e preto e branco, da 
Dismac, foram alguns langamentos na 
area de microcomputadores. 

Os estandes que langavam videogames 
tiveram, durante toda a feira, uma fre- 



qubncia inaudita e esperada. Afinal, jogos 
e, ainda mais coloridos e barulhentos, 
atraem atb mesmo o menos curioso visi- 
tante. 

A Milmar fabricante de Apple II Plus 
langou o Dactari, a Microdigital o Onyx, 
a Splice,o Splice Vision e o famoso Atari 
esteve distribuido em diversos estandes na 
feira, causando bastante rebuligo entre a 
criangada sediosa por jogar nas ternveis 
maquininhas. 

Outra atragao na III Feira de lnform6- 
tica foram as editoras. V6rias revistas fo- 
ram langadas. A Editele langou a Bits, a 
Prolbgica a "Geragao Prolbgica" e a Mi- 
cromega a "Pinball". 

Uma curiosidade atigou os visitantes e 
expositores atb o quarto dia da feira: 0 
que um gorila fazia numa feira de infor- 
m6tica?l... O gorila, uma versao brasileira 
do King-Kong esteve de segunda a domin- 
go em cima do estande da Micromega e 
gerou burburinho nas conversas de muita 
gente. Na quinta-feira, o segredo foi des- 
feito quando o gorila surgiu com uma fai- 
xa pendurada em seu corpo escrita: 
"PINBALL". Descobriram neste momen- 
to, que se tratava do langamento da nova 
revista da Micromega que, fugindo um 
pouco dos micros Iangar6 a Pinball - uma 
revista de videogames. 

Das inumeras atragoes da "feira-ale- 
gria" fatos importantes devem ser ressal- 
tados como por exemplo a presenga es- 
trangeira com represen tagoes da Argenti- 
na, Chile, Colombia, Equador, Panama, 
Venezuela e EUA, expondo na feira, a 
formagao da empresa Informitica Latino- 
Americana S/A formada com o intuito de 
atingir o mercado latino-americano. 



O Congresso 

O 269 Congresso Nacional de Informd- 
tica foi marcado, essencialmente pelo teor 
politico que adquiriu. Contando com a 
presenga de autoridades de forte peso 
politico desde secret^rios estaduais at6 o 
presidente da Republica, recebeu a visita 
de diversos congressistas e autoridades de 
varios paises que proferiram palestras e 
discursos quase sempre voltados para a 
necessidade de preservagao de um merca- 
do latino-americano. 

AI6m das diversas palestras (65 de ex- 
positores, 100 tbcnicas, sendo 12 interna- 
cionais), houve tambbm diversos mini- 
cursos com o objetivo de proporcionar a 
familiarizagao do leigo com os micros. 

A presenga do presidente Figueiredo 
reafirmou a posigao da maioria, quando 
ele afirmou: "ser imperativo abrir espagos 
para resultados mais concretos na forma- 
gao de um modelo brasileiro de inform6- 
tica atravbs da fabricagao e equipamentos 
nacionais". 

Uma das coisas que o Congresso mos- 
trou este ano, foi o interesse de pessoas 
leigas pela 6rea de inform^tica pois dos 
cinco mil participantes, trbs mil nao ti- 
nham contato com a tecnologia da 6rea. 

O objetivo de seus organizadores como 
na feira, foi totalmente atingido. Primei- 
ramente pelo teor politico que alcangou 
— todas as tendfincias estiveram presen- 
tes ao Congresso ou se preocuparam em 
seguir o curso que tomava as palestras nos 
jornais. Num segundo momento, mostrou- 
se, principalmente a 6rea federal, a impor- 
tSncia da regulamentagao da profissao e o 
sindicalismo. n 
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Usar o Micro Engenho e tao facil como 
fazer um milk shake. 

Voce coioca graficos, calculos, textos 
e ele entrega tudo bem mastigadinho 
Nada mais gostoso 



I love apple. 



0 Micro Engenho esta entre os melhores 
computadores do mercado Mas sd ele 
oferece duas vantagens de dar £gua na 
boca e fabricado com tecnologia Scopus 
e executa todo e qualquer programa 
existente para o Apple II Plus. 

Esta explicado por que o Micro Engenho 
e uma escolha natural. 



Aiem de ser inteiramente compativel com 
o Apple II Plus, o Micro Engenho oferece 
mats uma opg§o para quern tambem 
gosta de laranja: o modulo CP/M 
Experimente. Voce vai se apaixonar pelo 
Micro Engenho. 












fT 



O Micro Engenho seguiu direitmho a 
receita do Apple II Plus, com um 
ingrediente a mais: e o unico capaz de 
reproduzir todas as cores do Apple II nos 
televisores nacionais (PALM), 
dispensando quaisquer adaptagoes, 
tanto no micro como no TV 



O Apple II e um computador mundial mais 
conhecido que sorvete. E a mesma 
qualidade que o faz tao popular esta no 
Micro Engenho. Prove. Voce vai ficar 
derretido por ele 



A SPECTRUM poe o maior carinho em 
cada Micro Engenho que produz. Este 
amor continua durante o peri'odo de 
garantia e permanece sempre com o 
suporte de assistencia tecnica. 



O Micro Engenho cresce com voce. 

A SPECTRUM oferece toda uma safra de 
opgoes e acessorios que atendem as mais 
diferentes necessidades, proporcionando 
uma dtima colheita de interfaces, 
moduladores, acionadores de jogos, 
aplicativos etc 



SPECTRU M R. F6lix Guilhem, 91 3 - Tels.: (01 1 ) 2600826 e 260-2551 - CEP 05069 - SSo Paulo - SP. 
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Apple II Plus, compativel com Apple II Plus. 

IVIen hum outro micro tern uma vantagem tao grande. 



Agora o APPLE II PLUS b fabricado no Brasil com 
todas as caracteristicas que fizeram do seu irmao 
gemeo o microcomputador mais usado em todo 
o mundo. 

0 APPLE II PLUS brasileiro s6 tem uma diferenga: 
ele b adaptado para ser conectado ao seu TV 
a cores, no sistema brasileiro PAL-M. Alem de 
ser 1 00% compativel com o americano, o nosso 
APPLE II PLUS pode utilizar todos os acessbrios, 
perifericos e Software dos micros disponiveis no 
mercado nacional ou internacional. 



Caracteristicas Tecnicas: 

• 48 kbytes RAM (disponiveis); • 8 slots para 
expansoes (conexao para impressora, 
disk-drives, expansao de membria, 

saida serial RS 232 - C); • saida para cassete; 

• saida para conexao direta com TV colorido no 
sistema brasileiro (PAL-M) em video composto, 
ou em RF para conexao direta na saida da antena 
(UHF); • linguagem basic residente em 

1 2 kbytes de membria. 



FITIPTKA 



□CD 



Sao Paulo. Av Rebou<?as, 2315. 
fone 853 0448 R Conselheiro 
Crispimano, 49, fone 239 4122 
Campinas: Av. Iguatemi, 777, 
Shopping, fone 10192) 51-1 166 
Ribeirio Preto: R. Tibiricpa, 556, 
fone (016) 635 2866 




Computerlond 



Sao Paulo. Av. Ang6lica, 1996. 
fones 256 3307 / 258 3954 



Campinas. R Barao Itapura, 
917, fones (0192) 32-4330/ 
31 8498 



^mputique 

Campinas: R. Conceigao. 224, 
fones (0192) 32 4445 / 32 3810 
Po<?os de Caldas: R. Prefeito 
Chagas, 252, fone (035) 721 5810 
Rio de Janeiro: Av N. Sra. de 
Copacabana, 1417, lojas 303/304, 
fones 207-1093 267 1443 




Produzido por: 

Milmar Industria e Com6rcio, 
fones 531 9385 / 
532-0368, Sao Paulo, SP 
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Na numoro 3 ds Microhobby 
most ram os ns topso Program m do Mb 
como impfsmsntsr um srquivo no TK. 

Nssts numoro rscsbemos urns co/sborogSo 
axtrsmsmsnta intorosssnto s divortids. 

Quo compfomonts squats art ego pubhcsdo ns rsvista 3 
s most r a sfgumss sugastdes 
s urns splicsgSo bsstsnts spate total 



Nikon D. Martello 



Um mesmo programa trabalhado por duas pessoas, mostrar^ 
algumas solupoes comuns. No geral, entretanto, cada programa- 
dor optarS por solugoes diferentes, com maior ou menor eficiSn- 
cia e, at6 mesmo, maior ou menor elegSncia. 

Por outro lado, as tendfincias para programas mais econdmicos 
(afinal, 16 kBytes nao 6 quase nada!) levam a exerci'cios ginasti- 
cos na economia de bytes que, por vezes tornam-se ridiculos, co- 
mo no exemplo que segue: 



"100 LET N = 1 - substitua por: 

100 LET N = PI/PI e veja quantos bytes foram economiza- 
dos." S6 que, na instruqao 1 10 16-se: 



110 PRINT "EU NAO VEJO COMO SERA LEVADO 
ATE LADE MANEIRA SIMPLES ; 



0 que foi economizado na linha 100 o autor jogou fora na ins- 
trupao seguinte, num verdadeiro discurso. 

Por fim, o emprego que se d3 a um programa 6 caracteri'stico 
da filosofia de cada um. Assim, discordo da utilizapao do micro- 
computador como simples agenda ou livro hor^rio; prefiro uma 
agenda de papel e uma boa caneta esferogr^fica. E simples, r^pi- 
do, direto e econdmico. 

Todavia, sendo um glutao nato, adorando bons pratos e acepi- 
pes; frequentando restaurantes sempre que possi'vel, eu e minha 
esposa, por vezes, nos defrontamos com problemas que estes 
sim! - sao lindamente resolvidos pelos micros. 

"Onde vamos comer hoje a noite?" - pergunta um de n6s. 

"0 que V. deseja comer?" — responde o outro. 

"Nao sei . . . 0 que V. diz?" — volta o primeiro, e ficamos nes- 
se chove-nao-molha, vai-nao vai, — a soluqao dificil de ser encon- 
trada. 

Hoje tudo 6 mais tecil com o emprego do programa ARQUI- 
VO. publicado em Microhobby np 3. Basta fazermosa classifica- 
Qao dos restaurantes j3 conhecidos, list^-los e escolher. 

- Espere aN - reclama o leitor. - Vocd nao disse que preferia 
uma agenda de papel e uma caneta esferogr^fica?! 

Exatamente.ai est3 o fulcro da questao: a vantagem do micro 6 
setecionar para n6s, muito al6m de uma simples listagem. Veja 
como classifiquei meu arquivo RESTAURANTES. 



Quando o micro indaga "Deseja quantos campos?" escolhi 
quatro. Cada um deles com um miximo de quatro caracteres. De 
onde surgem os titulos: 



NOME 

TIPO 

CR$ 

R. 




COLOR 64 

o micro professional 
mais barato do mercado 



INDUSTRIA E COMERCIO 
COMPUTADORES NOVO TEMPO 
LTD A. 

Av Jose Mend one; a de Campos. 680 
Tel 70 1 0005 Sao Goncaio RJ 
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Em NOME classificamos — obviamente - os restaurantes pelo 
nome mais significative). Se o propriet^rio do restaurante tiver 
dotes verborr^gicos, problema dele: "TRATTORIA LA BELLA 
ITALIA Dl MAMMA ESGUIGNOTA" ficani reduzido a "Bella 
Italia". 

Em TIPO empregaremos um campo de 6 caracteres: CARNE, 
PEIXE, MASSAS, VARIOS, ARABE, etc. 

Em Gr$ queremos saber a faixa de prego (com a inflagao nao 
adiantarS detalhar). Entao partimos para o ALTO, ME:DIO, 
BAIXO, COM. (comercial). Neste ultimo entram as casas que ser- 
vem um menu fixo por dia, nao necessariamente barato. 

Por fim, em R. — por rua. avenida, etc. — o enderego. Este 6 
um dos que ocupa espago 'pr3 danar', nao sendo raros os nomes 
"Peixoto Gomide de Oliveira Campos, n9 1934". Neste item, par- 
ti da premissa de que jd conhecemos o restaurante — ou nao esta- 
ria em nosso arquivo - bastando um lembrete do enderego: "R. 
PEIX. GOMIDE, 1934". 

Entao perceba, agora, a vantagem de urn* programa como 
ARQUIVO! Uma vez construi'do o RESTAURANTES, ao se ter 
duvidas quanto a um programa, pedimos uma busca de registro. 
0 micro nos pergunta: "Busca por qual campo?". Se a carteira 
esta mais vazia, escolhemos o I'tem CR$. Se as pessoas "nao sa- 
bem" ou nao estao "inspiradas" quanto ao que se deseja comer, 
buscamos por TIPO. 

Como ultimo coment^rio — e ligado ao im'cio deste artigo 
discordamos da forma como foram tratadas as f rases no programa 
ARQUIVO, seja no original de Russel King ou na versao paulista. 
0 TK-82 (e seus primos) b muito lento e leva um tempo enorme 
escrevendo na tela. Ao mesmo tempo, cada letra 6 um byte e vale 
economizar membria para a aplicagao que desejamos. Desta for- 
ma, sem prejui'zo da inteligibilidade, restringimos o que vai nos 
PRINT do programa original. 

Em lugar de REGISTROS, colocamos DADOS que significam 
a mesma coisa, economizam 4 bytes a cada vez que surgir, e b es- 



crito de forma mais r^pida. NUMERO, b claro, foi reduzido para 
N9 (no TK empregando o mesmo sinal grbfico SHIFT-1). De 
outro lado, nos pareceu desnecessbrio o item 6 (ordenar registros) 
e 7 — gravb-los. Consta da apresentagao do menu: 

6. NAOTECLE RUN 

7. P/GRAVARTECLE GOTO 9990. 

Note outra economia: tecle , ao invbs de digite. Nao entrarei em 
outros detalhes, porbm ordens como "DESEJA QUANTOS CAM- 
POS?" foi reduzida para "QTOS CAMPOS?", enquanto "QUAN- 
TOS CARACTERES PARA 0 TITULO DE CADA CAMPO?" 
(ufa!) para uns mi'seros e rbpidos:" QTOS CARACTERES P/ 
CAMPO?". 

Resultado final: tenha mais que uma simples agenda. Tenha 
um micro auxiliando-o no cotidiano. Por exemplo, hoje a noite' 
iremos comemorar a aceitagao deste artigo na . . . deixe-me ver. . . 

"BUSCA POR TIPO?" 

Eu teclo um "S". 

MASSAS . . . 

CARNES . . . 

PEIXE.. " 

Consulto a esposa; ela estb a fins de uma lagosta na manteiga 
com um vinho branco alemao. 

Pego o telefone e consulte nosso editor, o Pierluigi . . . 

— Vocb esta doido? — estoura ele, do outro lado da I inha. - A 
MICROHOBBV ainda nao esta pagando em dblares! 

Desligo o telefone, tristonho, e volto ao microcomputador. 
Desta vez escolho o campo . . . 

"CR$ . . . " O 
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Microcomputadores e Software: 

Temos tudo que vocb precisa em 
equipamentos, perifbricos, supri- 
mentos, sistemas, jogos, progra- 
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indicar-lhe qual a melhor oppao 
de Sistemas Organizacionais e de 
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TORNE-SE UM EXPERT EM INFORMATICA 

• Oferecemos cursos profissionalizantes do bdaco ao aion^ado com especializayio cm 
Hardware ou Software. Acesso direio a computatiores e ao nosso laboraJono 
de eletronica. 

• Damos orienta^do adequada para o mercado de trabalho. 

ALGUNS DOS CURSOS Of E LHE OFERECEMOS: 

— processamento de dados: 

— programayio (linguagens Haste, Cobol. Assembler e Fortran): 

— andlise de sistemas intensivo ou cm niiel de pos-gradun^do; 

— eletronica has tea e digital: 

— mtcroprocessadores ; 
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cmpo turn* 
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PROGRAMA DO LEITOR 



JOGOS 

INTELIGENTES 



Felipe Schmidt 

Em que consiste Inteligfincia Artifi- 
cial? A principal meta da Inteligfincia Ar- 
tificial (IA) 6 tornar os computadores es- 
pertos. Pesquisadores em I A escrevem 
programas e tentam fazer tarefas que or- 
dinariamente poderiam ser realizadas uni- 
camente pela razao e racioci'nio humano 
Embora ningu^m tenha sido ainda levado 
a descobrir um programa que transforme 
o computador em uma entidade inteligen- 
te, algumas conquistas da I A sao extraor- 
din^rias e excitam nossa mente com suas 
possibilidades. 

0 termo Inteligdncia Artificial abrange 
um consider^vel numero de tdpicos. Ve- 
jamos alguns deles 

• Processamento da linguagem natural: 
Tenta fazer com que os computadores en- 
tendam a linguagem humana esuasv^rias 
h'nguas, seja IngIGs, Russo ou PortuguGs. 
Tern aplicagao em, por exemplo, tradu- 
gao por computador. 

• Solugao de prob/emas: E: um campo 
importante. Podemos facilmente escrever 
um programa que resolva equagoes poli- 
nomiais, mas se quisermos resolver outro 
tipo de problema, teremos que escrever 
outro programa especi'fico. A meta 6 um 
programa geral de solugoes, que seja ca- 
paz de encontrar solugoes para diferentes 
tipos de problemas. Tal programa seria ca- 
paz de demonstrar teoremas matem^ticos, 
resolver problemas de Xadrez ou mesmo 
resolver palavras cruzadas. 

• Reconhecimento de imagem: E: de im- 
portlncia fundamental na robdtica onde, 
por exemplo, uma mao mecSnica contro- 
lada por computador pode distinguir en- 
tre porcas, parafusos e arruelas - uma uti- 
lizagao bem melhor, pois para um compu- 
tador, ver por meio de uma camera de TV 
e reconhecer o objeto focal izado por ela, 
pode ser uma tarefa bem dif Tcil para ele. 

• Programagao automAtica: 0 operador 
apenas supriria o computador com especi- 
ficagoes do programa, e este se encarrega- 
ria de elaborar o programa. Ou entao, o 
computador poderia testar e corrigir pro- 
gramas escritos por pessoas. 




Neste artigo, tentaremos mostrar pri- 
mariamente como escrever programas de 
jogos inteligentes em BASIC. 0 BASIC 
utilizado, sera o do TK-82C, 83 ou 85. 
Embora esta nao seja a linguagem ideal 
para programas de I A, a sua vantagem 
esta no fato de que a grande maioria dos 
microcomputadores a utiliza como lin- 
guagem padrao. 

0 programador se defrontara com tr$s 
problemas principal: representagoes, bus- 
ca de solugao e abrangSncia. A maneira 
como superar estes problemas, no decurso 
da transformagao de sua id^ia em progra- 
ma, ir3 determiner, em grande parte, quao 
"inteligente" sera seu programa. 

0 problema de como representar uma 
estrutura de dados complexa em uma lin- 
guagem de computador, nao 6 limitado a 
I A. Entretanto, representagao pode ser 
um problema particularmente dif Tcil para 
quern est3 envoi vido com I A, uma vez 
que as estruturas e processos que se tenta 
modelar, por computador. sao bastante 
complexos. 

0 problema da busca de solugao 6 cru- 
cial em I A. Frequentemente, um progra- 
ma de I A tenta resolver uma tarefa, geran- 
do uma infinidade de possi'veis solugoes, 
testando cada uma, para determinar qual 
6 a correta. Isto 6 an^logo ao estudante 
que, ao inv6s de procurar resolver uma 
equagao do segundo grau pela fdrmula, 
meramente atribuisse diferentes valores 
para X, at6 encontrar aquele que fosse a 
solugao. O problema 6 que o conjunto das 
possi'veis solugoes, pode ser tao grande, 
que o computador pode ter dificuldades 
em gerar e testar todas elas em tempo h3- 
bil. Imaginem o estudante que provavel- 
mente testaria milhoes de valores de X at6 
encontrar o correto! (A despeito do fato 
do m^todo resolver qualquer tipo de 
equagao, nao parece muito pratico). 

Programas de jogos sao particularmen- 
te vulner^veis ao problema da busca, uma 
vez que pode haver um numero exponen- 
cialmente crescente de possi'veis movi- 
mentos a serem testados, at6 que o me- 
lhor seja encontrado. 



Finalmente, h3 o problema da abran- 
gSncia. Muitos programas de IA hoje em 
dia, operam com certos limites estreitos 
e bem definidos. Embora funcionem bem 
dentro desses limites, sua utilidade 6 res- 
trita justamente devido a estes limites. 
Mas quando o programa 6 estendido para 
operar com mais tipos de dados, provido 
com mais fungdes e utilitirios, surge um 
efeito negativo: o programa que agora po- 
de realizar um maior numero de tarefas, 
ja nao as realiza tao bem individualmente. 

Em outras palavras, em IA a abrang£n- 
cia (ou general idades) de um programa 6 
inversamente proporcional a sua eficiSn- 
cia. 

PROGRAMAS QUE JOGAM 

Em mead os da d^cada de 60 o fildsofo 
Hubert Dreyfus de Berkeley declarou que 
"um computador nao jogaria xadrez se- 
nao em m'vel de principiante" - pouco 
depois deste coment^rio, foi derrotado 
pelo programa Machac. Dreyfus ficou sur- 
preso, pois acred itava que jogar xadrez 
exigia certas caracteristicas humanas, 
como por exemplo, intuigao e criativida- 
de. Seu ponto de vista falha — quando 
caracteristicas humanas como criativida- 
de, analisadas em seus constituintes basi 
cos, se revelam como simples sequgncias 
de eventos fisioldgicos que podem ser imi- 
tados (e talvez melhorados) por um pro- 
grama de computador. Muitos dos pro- 
gramas que t6m sido desenvolvidos, ten- 
tam jogar Xadrez, Damas ou Go imitan- 
do o processo que se desenvolve na mente 
humana - quando esta se ocupa de um 
jogo dessa natureza. Muitos destes pro- 
gramas incorporam fungoes de avaliagao 
que, embora representem o processo de 
pensamento humano em algum grau, nao 
sao modelos deliberados da mente hu- 
mana. 

0 programa que teve at6 hoje o melhor 
desempenho contra um bom jogador 6 o 
BKG 9.8 de Hans Berliner, que joga Ga- 
mao. Em um "match" contra o campeao 
mundial de Gamao, Luigi Villa, BKG ven- 
ceu quatro em cinco partidas. 

0 mais forte programa de Xadrez 6 o 
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CHESS 4.7 da Northwestern University, 
que ganhou uma partida do grande rrestre 
internaciona! David Levy em um torneio 
cujo resultado foi 3,5 a 1 ,5 (tr§s vitorias, 
um empate e uma derrota ) a favor de Levy . 

A FUNQAO DE AVALIAQAO 

Como proceder para escrever um pro- 
grama de Xadrez ou Damas? O primeiro 
passo 6 desenvolver um procedi mento 
exato e preciso, para determinar quando 
o computador vai jogar e qual movimento 
6 o mais adequado naquele instante de jo- 
go. Este procedimento 6 chamado fungao 
de avaliagao. Uma fungao de avaliagao pa- 
ra xadrez ou outro jogo, deve ser especi'fi- 
ca o suficiente para que possa ser traduzi- 
da em um programa de computador. Al- 
gumas teorias de estrat^gia ou fatores po- 
sicionais podem ser impossiveis de serem 
incorporados em um programa, sem um 
refinamento da teoria, em termos mais 
precisos. 

Dois m^todos de programagao comu- 
mente usados em fungoes de avaliagao, 
sao os de mini-maximizagao e o algoritmo 
alfa-beta. 

Arvores e mini-maximizaqao 

Suponhamos que uma pessoa esteja jo- 
gando Xadrez com um computador. Esta 
acabou de mover e passa a vez ao compu- 
tador. O que o programa fara? 



Uma maneira logica de proceder 6 
construir uma arvore dos possiveis movi- 
mentos. 0 programa verifica — digamos, 
seis jogadas a f rente: trSs brancas e trSs 
pretas. Dentro desta limitagao de seis 
jogadas, o computador gera todas as pos- 
si'veis combinagoes de movimentos. AI6m 
disso, para cada movimento possivel, o 
computador associa um valor numdrico a 
configuragao resultante no tabuleiro; este 
valor num^rico indica quern esta em van- 
tagem, baseado em fatores como material 
e posigao. Para gerar a arvore, o programa 
sempre assume, que o oponente fara o 
melhor jogada possivel. 

Vejamos um exemplo de crit6rio de 
avaliagao de posigao para Xadrez: 



Pontos 


1 For aumentar a mobiltdade 
da dama 


♦ 2 


2 Por aumentar a mobilidade 
do bispo 


♦ 22 


3 Por aumentar a mobilidade 
do cavalo 


♦ 0,3 


4 Pot nao haver real « /ado 
o roque 


-0.4 


5 Por estar defend i do o peao 


♦0.1 



Este tipo de avaliagao concede mais 
pontos a defesa que ao ataque, portanto 
sao necessarios os seguintes fatores de 
corregao: 



Pontos" 


1 Por a u man tar a mobiltdade 
do cavalo da dama 


♦ 0 JB 


2 Por melhor er a defesa do* 
ped« 


♦ 0.6 



3 P or aumentar a mobiltdade 
da torre da dama 


♦ 1.0 


4 6 bispo da dama defende us 


♦0.5 


5 0 peao do rat esta defendtdo 
pelo cavalo 


♦ 0,3 



Esta avaliagao s6 pode ser realizada em 
posigoes "estaticas", ou seja, sem troca de 
pegas ou xeques. 

Quando o computador houver gerado 
a 2rvore inteira, ele retorna pelo ramo da 
arvore que resultou em maior vantagem 
(maior pontuagao). Esta t^cnica a chama- 
da mini-maximizagao, uma vez que o com- 
putador joga para obter a maior vanta- 
gem, supondo sempre que o adversario jo- 
gar2, para I he dar a menor vantagem pos- 
sivel. Quando o computador determinar 
qual sequfincia 6 a melhor, este executa o 
primeiro movimento da sequGncia. 

ALGORITMO ALFA BETA 

A utilizagao de Arvores e mini-maximi- 
zagao parece ser a melhor maneira de ge- 
rar todos os movimentos possiveis em um 
jogo. Uma maneira evidente de aumentar- 
mos a forga do programa seria verificar 
mais jogadas a frente e, em lugar de seis 
movimentos, poderi'amos pesquisar 15 
movimentos. Se o computador puder fa- 
zer isto, provavelmente sera imbativel. 

A dif iculdade em criar uma Arvore para 
15 movimentos, 6 que o numero de 
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combina<p5es possi'veis 6 da ordem de 
10 15790 ! (Considerando que o universo 
tem "apenas” 10 80 Stomos, chamar aque- 
le numero de astrondmico, seria incorreto 
e injusto). 

Evidentemente a quase total idade des- 
tas combinagdes sao desdobramentos de 
jogadas implausi'veis ou fracas, abrindo as 
sim, espa<po para redupao deste numero. 

Uma maneira de limitar a quantidade 
de buscas, 6 por meio do algoritmo alfa- 
beta. A id6ia por tras dele 6 simples. 
Quando o computador estri gerando a 2r- 
vore dos possi'veis movimentos, nao 6 ne- 
cessario gerar o ramo que resulta de um 
movimento inferior da parte do compu- 
tador. Em outras palavras, se o compu- 
tador avaliou o movimento e concluiu 
que este nao 6 bom, nao 6 necessario veri- 
ficar os movimentos subsequentes, de mo- 
do que o movimento X nao sera realizado 
em hipdtese alguma. Analogamente — se 
guindo a id6ia do mini-max - o compu- 
tador nao necessita gerar o ramo da £rvo- 
re, que resulta de um movimento inferior 
por parte do oponente. 

Quando o algoritmo alfa-beta 6 empre- 
gado como parte de uma busca em arvore, 
o tempo economizado 6 fenomenal. 
Estima-se que em condi goes 6timas, uma 
busca de quatro movimentos aumenta 
sua velocidade em cerca de 500 vezes. 

Vejamos alguns crit^rios que podem 
nos orientar na eliminapao de movimen- 



tos (geralmente se utilizam mais de cin- 
quenta critdrios para uma avaliapao defi- 
nitiva): 



1 . Equih'brio de material 

2. Valor das pepas 

3. Estrutura dos pedes 

4. Seguranpa do prdprio rei 

5. Controle do centro 



DAM AS 

Vejamos a seguir, a ti'tulo de exemplo, 
um programa que joga Damas. Acompa- 
nhe a descripao pelo fluxograma mostra- 
do adiante. No interesse da brevidade, ele 
nao incorpora uma rotina de gerapao de 
arvore para os movimentos, como descri- 
to anteriormente. Apenas verifica um ou 
dois movimentos, dependendo da situa- 
pao. 

O programa esta dividido em seis sub- 
rotinas - num programa supervisor — que 
as chama a medida que sao necess^rias. 

A primeira subrotina 6 a da linha 450. 
Ela desenha e numera o tabuleiro. 

Em seguida a chamada a subrotina da 
linha 230. Esta rotina coloca as pepas em 
sua configurapao inicial. A disposipao das 
pepas 6 represen tada como uma sai'da gra- 
fica no vi'deo e como um array 12x12 
(T$). Necessitamos de um array 12x12, 
pois se utilizassemos um 8 x 8 certos argu- 
mentos da variavel T$ se tornariam nega- 
tivos em certas operapoes, o que resulta- 
ria em erro de software; deste modo, cria- 
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mos entao, uma margem em torno do ta- 
buleiro. 

A subrotina que escolhe o primeiro 
movimento 6 a da linha 970. O compu- 
tador joga sempre com as pretas. Como, 
em Damas, as pretas sempre iniciam o jo- 
go. o computador sempre corner jogan- 
do e isto simplifica um bocado o nosso 
programa! 

A subrotina simplesmente escolhe alea- 
tbriamente um movimento em direCo as 
ca£as centrais. A subrotina de entrada (li- 
nha 780) permite ao jogador introduzir 
sua jogada. Como a fun<?ao INKEY$ a uti- 
lizada, nao ha necessidade da utiliza^o 
do NEWLINE. Assim que o quinto carac- 
ter 6 introduzido, a rotina a terminada. 

Os dois primeiros caracteres sao as 
coordenadas da casa de sai'da, o caracter 
do meio a um ” (hifen) para jogadas 
normals, ou um "x" para saltos duplos 
ou triplos (capturas) e os caracteres finais 
sao as coordenadas da casa de chegada. 

Como o objetivo deste programa a sim- 
plesmente ilustrar a mecSnica de um pro- 
grama de jogo, nao houve compromissos 
com relaCo aos detalhes. Deste modo 
nao ha cntica de entrada e a possivel a in- 
troduce de movimentos ilegais. AI6m 
disso uma possivel dama nao a identif ica- 
da pelo programa. mas o operador poderS 
simular seu movimento usando o "x" no 
lugar do hi'fen. Como a captura s6 a reco- 
nhecida em jogadas normais, a necessario 
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1® COSUB 4&e 

2© COSUB 230 

P5 5LOU 

30 GOSUB 970 

35 GOSUB RiO 

40 GOSUB ?t>0 

45 GOSUB 040 

50 IF M= 1 THEN GOTO 40 

55 GOSUB 1040 

50 GOSUB 040 

65 GOTO 40 

230 REM 4ft**#*###***#*##*#*# 

231 REM CONFIGURRCRO INICIRL 
235 DIM 1 (112, 12 ) 

240 FOR 1-2 TO 11 
250 LET T| ( 1,21 «"X" 

260 LET T»(I,11)«"X M 
270 LET T$(2,I)="X" 

200 LET T$(11,I)«“X" 

290 NEXT I 

320 FOR 1-3 TO 9 STEP 2 
325 LET THI,3)«"B” 

330 LET T* C 1*1 ,4) -“B" 

33S LET T* (1,5) =”B" 

340 LET Tlflftl.B) = ** P " 

345 LET T* ( 1,9) ="P” 

350 LET T$(l4l,10) ."P" 

355 PRINT RT £2,3*1;“*" 

360 PRINT RT 1 9 , 3 * I *3, - *~ 

365 PRINT RT 16,3*1;"*" 

370 PRINT RT 7,3*1 *3;"0" 

375 PRINT RT 4,3*1; "O' - 
300 PRINT RT 1, 3*1*3, fl" 

390 NEXT I 

395 PRINT RT 0,0; "HUHRNO" 

396 PRINT RT 4,0;** M ICRO" 

397 PRINT RT I II ffr] fH 
400 RETURN 

450 REM ft******************* 

451 REM DESfcNhfl E NUMERR O TRBU 
LEIRO 

455 POKE 16418,0 
£9 LE^R$s" ■■ ■■ 

^470 ^ 

475®S?ND 

480 FOR 1 = 1 TO 4 
490 PRINT B*;P*;B* 

500 PRINT R$;R|,Rf 
510 NEXT I 

520 FOR 1-1 TO 0 STEP 2 

530 PRINT RT O, 3*1*7; CHR* (1*37 

^535 PRINT RT 0, 3*1*10; CHR* <1*1 

540 PRINT RT 3*1-1, 8, CHR* 137-1 
>;RT 3*1*2, 8; CHR$ (164-1) 

550 NEXT I 
560 RETURN 

780 REM ••#**>**«•**•*»*•#*• 

781 REM ENTRRDR 

785 PRINT RT 20,0; CHB3M" 

790 LET K=0 

791 LET C*e”*B“ 

795 LET Ef*" " 

800 IF INKEY * < > ” ” THEN GOTO 800 
810 IF INKEY*-"" THEN GOTO 810 
815 LET E * =E * * INKEY * 

820 PRINT RT 1,0;E*, " - 

©25 IF LEN E*«=6 THEN GOTO 035 

830 GOTO 800 

835 PRINT RT 20 , 0; 

836 RETURN 

840 REH **#**ftft»#»##ft*»***ft* 

841 REM RLTERRCRO DO TRBULEIRO 
845 IF C *(2)="P" THEN PRINT RT 

® / O; ei 

©SO LET I —CODE E*(2)-35 
852 LET J=URL E*(3)*2 
854 LET K -CODE E*C5)-35 
8S6 LET L *URL E»(6)*2 
050 LET M=(E*(4) — "X") 

B60 PRINT RT 3 1 -3 #U , 3 # 1 ; "I" 

865 PRINT RT 31 -3 *L , 3*K; C * l 1) 
870 LET T* ( I , «J) »*’ •* 

875 LET T* (K,L) =C* (2) 
oeo ir L-joi then return 



- 1 . 5 ft ( U ♦L ) , 1 . 5 » ( 



690 PRINT RT 31- 
X*K) ; 

e95 LET T*f (XftK) s2 , ( J ft L ) x2) i 
900 RETURN 

950 REM ft*#***#****#****»**4 

970 REM PR IME I HO MOUIMENTO 
975 LET C* = "OP" 

980 LET RsIHT (PND*4*.5) 

98S GOTO IR *5*990) 

990 GOTO 980 

995 LET E* = " B6-C5" 

997 GOTO 1015 

1000 LET E * = " D6-C5” 

1001 GOTO 1015 

1005 LET E*=" D6-E3” 

1006 GOTO 1015 

1010 LET E* = " F6-E5" 

1015 GOSUB 040 
1020 RETURN 

1040 REM #ftft##»»*##»**»»fr»»»< 

1041 REM RUQL1RCRO 

1042 RFM PRRTE R. 



1050 LET C*n OR* 

1060 PUR 1-3 TO lO 
1070 FOR J=3 TO 1® 

1080 IF T* (I,U) < >"P" THEN GOTO 1 
1 J ® 

1090 IF T*(I*1,«J-1) <>"0“ OR T*(X 

♦ 2,U-2)<>" " THEN GOTO 110(3 

1091 LET T*II*1,J-1j — ” " 

1092 PRINT RT 34 -3 *U , 3 * I *3 ; 

1093 LET E* = ” "♦CHR* (35*I)ftCHR* 
( Jft26) ♦" -" +CHR* (37*1) *CHR* (U* 

24) 

1095 RETURN 

1100 IF T* (1-1 ,J-1) < > "B" OR T * ( I 

-2,U-2)<>" " THEN GOTO 1110 

1101 LET T* (I-1,U-1) «" " 

1102 PRINT RT 34-3*U, 3*1-3, 

1103 LET E*=»" "♦CHR* (33*1) *CHR$ 

(26*0) ♦"-"♦CHR* (33*1) ftCMR* CO* 

24) 

1105 RETURN 

1110 NEXT O 

1111 NEXT I 

1120 REM PRRTE B. 

1130 FOR 1*3 TO 10 
1140 FOR 0*3 TO 10 

1150 IF T*(I,0) <>"P" THEN GOTO 1 
220 

1160 IF T* 41-1,0-1) <» "B” OR T*(I 
♦1,0*1) <>” " THEN GOTO 1160 

1165 IF T* (1,0*2) < >”P" THEN GOTO 
1170 

1166 LET E**" "♦CHR* (35*1) +CMR* 
(0*28) ♦**-•• *CMR* (1*36) *CHR* CO* 

27) 

1167 RETURN 

1170 IF T*(X*2,0*2) «>“P” THEN GO 
TO 1200 

1173 LET E*«” "♦CHR* (37*1) ♦CHR| 
(0*28) ♦"-"♦CHR* (1*36) *CHR| (O* 

27) 

1175 RETURN 

1180 IF T* (X*l,0-1) < >"B" OR T*(I 
-1,0*1) <>" " THEN GOTO 1220 

1185 IF T* (1-2, 0*2) < >"P" THEN GO 
TO 1190 

1186 LET E*«” "♦CHR* (33*1) *CHR| 

(0*28) ♦"-“♦CHR* (1*34) *CHR| (O* 

27) 

1188 RETURN 

1190 IF T* (1,0*2) < >"P“ THEN GOTO 
1210 

1195 LET E*«" ” *CMR * (35*1) ♦CHR* 

(0*28) ♦"-"♦CHR* (1*34) *CHR* CO* 

27) 

1197 RETURN 

1200 IF T* (1*1 ,0-1) < >“ “ THEN GO 

TO 1220 

1205 LET E* = " ” ♦CHR * (35*X) fCHRI 

(0*26) ♦"—"♦CHR* (1*36) *CHR$ (O* 

25) 

1207 RETURN 

1210 IF T*(X-1,J-1) < > " “ THEN GO 
TO 1220 

1215 LET E**" ** *CHR * (35*1) ♦CMR* 

(0*26) *"-" *CHR| (1*34) *CHR* CO* 
25) 

1217 RETURN 

1220 NEXT O 

1221 NEXT I 

1230 REM PRRTE C. 

1240 FOR 1-3 TO 10 
1250 FOR 0*3 TO 10 

1255 IF T*(X,0) <>"P" THEN GOTO 1 
340 

1260 IF T* (1-1 ,0-1) < >" " OR T|(I 

-2.0-2) * " 0 " THEN GOTO 1260 
1270 IF T* ( 1-2 , 0) " RND T*(I,0 

-2) »"B" THEN GOTO 1280 
1273 LET E* = “ ’♦CHR* (35*1) *CHR* 
(0*26) ♦"-“♦CMR* (1*34) *CHR* (O* 

25) 

1275 RETURN 

1280 IF T* (1*1 ,0-1) < >” " OR T * ( X 

*2,0-2) »"B“ THEN GOTO 1340 
1290 IF T* (1*2,0)-" '• RND T*(X,0 

-2) * "B ” THEN GOTO 1340 
1300 LET E * = *' "♦CHR* (35*1) ♦CMR* 
(0*25) ♦"-" ♦CHR* (1*36) +CHR* (O* 
25) 

1310 RETURN 
1340 NEXT O 
1350 NEXT I 

1400 REM OURLOUER MOUIMENTO POSS 
IUEL 

1410 FOR 1-3 TO 10 
1420 FOR 0=3 TO lO 

1436 IF T*(I,0) <>"P" THEN GOTO 1 
500 

1440 ir T* (1-1,0-11 < >" - THEN GO 

TO 1470 

1450 LET E*-" "*CHP* (35*1) *CHRS 
(0*26) ♦"—"♦CHR* (1*34) ftCHP* (O* 

25) 

1460 RETURN 

1470 IF T* (1*1, 0-1) * >" “ THEN GO 

TO 1500 

1460 LET E*«" "♦CHR* (3S*I) ♦CHR* 
(0*26) ♦"—“♦CMR* (Z*36) *CHR| CO* 

25) 

1490 RETURN 
1500 NEXT O 
1510 NEXT I 
1520 STOP 



fazer com que a dama ocupe a casa que 
cont6m a pega preta, e em seguida se mo- 
va para a casa desejada. 

A subrotina da linha 840 6 chamada 
ap6s cada movimento. Ela altera o array 
e o display para refletir a nova configura- 
gao. 

ROTINA DE AVALIAQAO 

A ultima subrotina (linha 1040) 6 a 
maior e mais importante. E: a rotina de 
avaliagao, na qual o computador (pretas) 
decide que movimento executar. A rotina 
6 baseada no seguinte algoritmo: 



1. Se as pretas estao em posigao de 
capturar alguma pega branca, entao que o 
fagam. 

2. Se as pretas estao ameagadas de 
captura pelas brancas entao: 

2a. se for possi'vel a defesa atrav^s do 
bloqueio da retaguarda entao que o fa- 
gam, senao; 

2b. se for possi'vel movimentar a pega 
ameagada entao que o fagam, senao; 

3. As pretas fazem o primeiro movi- 
mento que nao resulte em captura da pe- 
ga movida. Se todos os movimentos resul- 



tarem em captura, uma pega qualquer 6 
movida. 

Como voc6 pode ver, este 6 um algorit- 
mo simples e descomplicado que serve pa- 
ra manter as pretas longe dos problemas. 
Isto resulta em um programa que nao 6 
particularmente agressivo, mas que usual- 
mente se defende adequadamente. 

A rotina de avaliagao se divide em trfis 
maiores partes. Parte A, na qual as pretas 
procuram possi'veis captures, corresponde 
a parte 1 do algoritmo acima. Parte B, na 
qual as pretas se defendem de captures, 
corresponde a parte 2 do algoritmo, e 
Parte C onde as pretas procuram um mo- 
vimento que nao resulte em captura, cor- 
respondente a parte 3. A organizagao 6 
hierarquica. Se as pretas nao encontram 
movimentos a serem feitos na Parte A, o 
controle passa para a Parte B. Se nenhum 
movimento resulta daqui, entao o contro- 
le passa para a Parte C. 

Vamos dissecar a Parte A da subrotina 
e ver como ela funciona. A Parte A 6 im- 
plementada com dois loops FOR. . . 
NEXT; cada um variando de 3 a 10, var- 
rendo todo o tabuleiro. 

A linha 1080 percorre todos os qua- 
drados do tabuleiro procurando por uma 
pega preta. Quando esta 6 encontrada, as 
linhas 1090 e 1100 tomam lugar. Elas 
procuram por uma situagao especial que 
pode ocorrer em dois dos quatro quadra- 
dos adjacentes: a situagao em que uma pe- 
ga branca possa ser capturada. 

Vamos assumir que uma pega preta es- 
te j a localizada em T$(6,6). Esta situagao 
6 ilustrada na Fig. 1 . 



T$(I,J) 







T 






T$(l— 1,J— 1) 








T$(I+1,J— 1) 


-1- 

T$(l— 2,J— 2 






-1- 

T$(I+2,J— 2) 



Fig. 

A linha 1090 procura por uma pega 
branca em T$(I+1,J-1) e por uma casa 
vazia em T$(I+2,J— 2). Se ambas as con- 
digoes sao satisfeitas um vazio 6 colocado 
em T$(I+1,J— 1), a subrotina armazena o 
movimento (salto) em E$, chamaa subro- 
tina da linha 840 e retorna ao programa 
principal. Se por outro lado, uma ou am- 
bas as condigoes nao forem satisfeitas, o 
programa passa para a linha 1 100. Esta li- 
nha analisara as casas (I — 1 ,J — 1 ) e 
(I— 2,J— 2). Apenas quatro casas precisam 
ser consideradas quando o programa pro- 



curer uma possi'vel captura; as casas atras 
da pega podem ser ignoradas, uma vez 
que apenas as damas podem andar para 
tr^s e este programa nao prev§ damas para 
as pretas. Se nao houver captura possi'vel, 
o controle passa para as Partes B e C da 
subrotina, cujo funcionamento 6 seme- 
Ihante a Parte A. _ 
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Um pouco de Idgica: AND , OR, NOT 

Existem no TK trGs "palavras" que po- 
dem ser muito uteis quando associadas ao 
IF; sao elas: 

AND (tecla 2) 

OR (tecla W) 



NOT (tecla N Function) 

AND significa "e", NOT significa 
"nao", enquanto OR significa ”ou". Su- 
ponha que no programa que imprimia 
"beleza" ou "alegria" mud^ssemos as 
condipoes para: “se o numero estiver en- 



tre 30 e 70, imprima "beleza"; devere- 
mos substituir a linha 50. 

S® IF N > 3© AHO N<7® THEN GOTO 
lOO 

Para ilustrar as outras duas, fapamos 
um pequeno programa: — ► 




nAo perca tem- 

PO! SOLICITE 
INFORMACOES 
AINDA HOJE! 



GRATIS 



compuTflcno 

ELETRdniCfl ! 



NO MA1S COMPLETO CURSO OE ELETRONICA DIGITAL E MICRO 
PROCESSADORES VOCE VAI APRENDER A MONTAR, PROGRAMAR 
E OPERAR UM COMPUTADOR. 

MAIS DE 160 APOSTILAS LHE ENSINARAO COMO FUNCIONAM OS, 
REVOLUCIONARIOS CHIPS 8080, 8085, Z80, AS COMPACT AS "ME 
M0RIAS"E COMO SAO PROGRAMADOS OS MODERNOS COMPU 
TADORES. 

VOCE RECEBERA KITS QUE LHE PERMITIRAO MONTAR DIVERSOS 
APARELHOS CULMINANDO COM UM MODERNO MICRO-COMPU 
TADOR. 

CURSO POR CORRE9PONOENCIA 

^CEMI - CENTRO DE ESTUDOS DE MICROELETR0NICA E INFORMATICA ^ 
Av. Paes de Barros. 411 , cj. 26 — Fone (Oil) 93-0619 
Caixa Postal 13.219 - CEP 01000 - SSo Paulo - SP 



Endere^o . . . . . 






Bairro 






CEP 







J j 
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Quanto ao LPRINT e ao LLIST eles 
fazem o mesmo que os ja conhecidos 
PRINT e LIST, s6 que, ao inv6s de escre- 
verem na tela de TV, escrevem na impres- 
sora. Ainda para lidar com a impressora, 
existe a "key-word" COPY (tecla Z),que 
copia exatamente o que esta desenhado 
na tela. (Naturalmente vocS pode fazer 
um BREAK durante um COPY - se nao 
desejar copiar a tela toda). 

Algumas observagoes sao necessarias: 

a) o LLIST permite, assim como o 
LIST, fazer uma listagem a partir de qual- 
quer linha do programa. 

b) Para programas "menores" que uma 
tela, 6 conveniente uma COPY ao inv6s de 
LLIST, pois ele 6 mais r^pido. 

c) Nao existe a instrugao LPRINT AT 
(tente execut^-la . .), mas existe a instru- 
gao LPRINT TAB 

d) Com excegao do AT e do SCROLL, 
o PRINT e o LPRINT sao perfeitamente 
compati'veis com relagao ao posiciona- 
mento da impressao (TAB, ;); no entanto, 
se vocS for utilizar numeros na faixa de 
0,00001 a 0,0099999999 a instrugao nao 
funciona adequadamente, experimente: 






10 let x=0, 00001 

20 LPRINT X 



Note que temos em jogo o seguinte 
conjunto de numeros possi'veis: 

[0,1,2,3,4,5,6,7,8,9,10] 

Para X < 2 ou X > 8 teremos =*[0, 1 , 
9, 10"] 

Para NAO (X < 6) = X > 6 =>[6, 7, 8, 
9, 10] 

Para X>3e X <7 =>[4,5,6] 

Em BASIC teri'amos: 



5 SLOU 
10 RRND 

20 FOR I»1 TO 7 
30 LET X= INT (11*RND) 

40 if x ce or x>e then print **t_ 
oi- 

50 IF NOT X«6 THEN PRINT ~50L~ 
60 IF X>3 RND X<7 THEN PRINT ~ 
ESTRELR" 

70 PRINT X 
©0 NEXT I 
©S FRST 



Estas palavras aliadas ao IF serao dis- 
cutidas novamente em aulas futuras. Note 
que temos os si'mbolos <= menor ou 
igual, (tecla R) e> = maior ou igual (te- 
cla Y) que tamb6m podem ser utilizados 
com a instrugao IF 

Vamos agora concluir todos os si'mbo- 
los "vermelhos" (ou amarelos) do TK 
com excegao do $ que sera visto futura- 
mente; faltam apenas: 



Os trSs primeiros, nao tSm nenhuma 
fungao especial e servem apenas para par- 
ticiparem de "mensagens" que devem es- 
tar sempre entre aspas, (Pode-se acrescen- 
tar a eles o . que esta na mesma tecla que 

a .)• 

J3 o STOP serve apenas para "que- 
brar" a execugao de um programa: um 
programa pode constar de varias partes, 
cada uma terminada por STOP. Ao chegar 
no STOP o programa para, podendo ser 
reiniciado a partir da instrugao seguinte, 
usando CONT (veja a aula 3). Por exem- 
plo: 



5 SLOW 

lO PRINT TRD S; "PCRTLE5" 
20 STOP 

30 PRINT TRB S; **IS LOUE~ 
4.0 STOP 

SO PRINT TRB S; r 'rWfE^*ffR'* 
BO STOP 
70 PRINT 
00 LET I =2 
SO PRINT IttB 7; I 
1O0 IF 1=256 THEN STOP 
HO LET 1=1*1 
120 GOTO OO 



Digite RUN e NEW LINE; a seguir vo- 
cS tera que digitar CONT e NEW LINE 
nas primeiras trSs vezes que o programa 
parar. 0 que acontecera se vocS fizer 
CONT e NEW LINE quando o programa 
parar pela quarta vez. 

Note que ao passar por STOP, o TK 
imprime a seguinte mensagem no canto 
esquerdo inferior: 



? 

£ 

STOP (tecla A) 
LPRINT (tecla S) 
LLIST (tecla G) 



9/ (linha que parou o programa) 

Observapao: 0 STOP ja havia sido memo* 
rizado suscintamente na aula n9 4, quan- 
do falamos sobre o INPUT 



Em aulas futuras, veremos como con- 
tornar este problema. 

0 LPRINT tern um si'mbolo especial 
para diagrama de blocos: 




O que acontece se tentarmos usar estes 
comandos sem a impressora estar conec- 
tada? 

Exercfcios: 

1 . Faga um programa capaz de cal- 
cular o fatorial de um numero inteiro po- 
sitivo. 0 programa nao deve aceitar nume- 
ros negativos e/ou fracion^rios imprimin- 
do uma mensagem de erro. 

Define-se fatorial de n , como sendo: 

n! =n.(n-1).(n-2). . . 1 

Assim 

5! =5.43.2. 1 =120 

2) Escreva um programa que leia o nu- 
mero e mostre, na tela, se o numero 6 par 
ou fmpar. Seguindo o mesmo raciocmio, 
faga entao outro programa que escreva na 
tela "multiplo de 6" toda vez que o nu- 
mero for multiplo de 6 — (Dica: a + b = 
= c com resto d, como se calcula d ?) 
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COMPUTADOR PESSOAL 

AS-1000 



1 




CARACTERISTICAS TECNICAS: 



UN/DADE DE PROCESSAMENTO 

■ Mtcroprocessador Z80 A (8 bits) veiocidade 3, 25 MHz 

MEM6RIAS: 

- 8 Kbytes EPROM ( sistema mterpretador BASIC) 

— 16 Kbytes RAM futihzapAo para o usuAno ) 

MONITOR DE VIDEO: 

- TV B&P oucdr no canal 2 (sem modificapAo) 

- 24 hnhas com 32 caracteres por linha 

— GrAficos 44 x 64 pixels 

— Video re verso e normal comutAve / por chave 



SOFTWARE 

— Compatfvel com CP200. TK82-C.TK83, TK85, 

NEZ8000. TIMEX 1000, ZX80, 
ZX81 

— ProgramAvel em hnguagem de mAquma 

— Basic restdente 



UN/DADE DE FITA: 

— Urn gravador (sem interface AS- 1 00) 

— Usando interface AS- 100 at A quatro gravadores 

TECLADO 

— Membrane com apAo sensitive de toque (bofha 
met Alice moxidAvel ) 

— 40teclascom 154 funqdes. caracteres a/fanumAncos. 
caracteres grAftcos, funqdes matemAticas. comandos 

expansAo 

— Para 32 Kbytes e 48 Kbytes <64 Kbytes total.) 

— Adiciona-se um ou dots mddu/os de 1 6 Kbytes, no 
interior do micro. atravAs de acesso prbpno no fundo 
do mesmo 

0 mddulo bAsico de 16 Kbytes, e os dois de 
expansAo. sAo todos iguais. permrtindo expansAo 
progressiva pe/o usuAno 

acessOrios 

Dots cabos para conexAo de gravador 

— Um cabo para conexAo do micro a TV 

— A fonte de alimentaqAo f 1 10/ 2 20V) jA A embuvda no 
AS- 1000 d/spensando quafquer fonte externa 



PERtfpRfCOS 

— Modem para transmissAo de dados 

— Joystick 

— AS 100 (interface) 

opera e gerencia atA quatro gravadores 

- comanda quafquer impressora (inclusive 
profissionais) 

- mampula arquivos em fita e nAo somente programas 
mteiros. 

a vanq a e pAra gravadores. tambAm por software 
(programaeAo) 

- testa vahdade de programas e arquivos em fita. 
permite cdpias de f/tas 

- hsta programas. dados e arquivos na impressora 
exc/usivo s/stema FSK (frequency shift keying) com 
compressor de Audio, que a/usta automaticamente 
o nivel para o gravador. ehmmando a desagradAvel e 
crftica tarefa de a/uste no mesmo. oferecendo total 
confiabilidade nas gravapbes em fita 

Mddu/os de expansAo (vide memdnas) 

— Speed file 

expansAo externa de memdna com 1. 2 ou 4 
Mbytes 



GARANTIA DE 1 ANO 
ASSISTENCIA TECNICA DE FABRIC A 



engebrAs 



ENGEBRAS ELETR6NICA E INFORMATICA LTDA. 

ADMINISTRAQAO DE VENDAS: Rua Russel, 450 - 3° - Tel 205-4898 
CEP 2221 0 - RIO DE JANEIRO - RJ 



I 






UVROS PARA TK , NEZ, CP 



r ~ 

TRINTA JOGOS 



PEQUENOS 




ANUNCIOS 



INCLUINDO PROGRAMAS EM CODIGO LIS 
TADOS POR IMPRESSORA 

JOGO DE DAMAS, LABIRINTO, GUERRA 
NAS ESTRELAS, ENTERPRISE , PAREDAO , 
DEMOLIDOR, VELHA, pASSINO, ROLETA 
RUSSA, CORRIDA DE CAVALOS, GOLF, 
VINTE E UM, CUBO MAGICO , SENHA , BAN 
CO IMOBILIARIO, BOMBARDEIO , SOM 

POR SOFTWARE, ETC 

LANpAMENTO CR$ 4.000,00 

APLICACOES SERIAS 

0 

FOLHA DE PAGAMENTO, BALANCETE ,CON 
TAS A RECEBER, A PAGAR , CORREQAO 
MONET ARIA DAS CONTAS DO BALANQO, 
CORREQAO DAS CONTRIBUIQOES DO I. 
A.P.A.S., CADASTRO DE CLIENTES , 
CONTA BANCARIA.TABELA PRICE, ESTA- 
TISTICA, CORREQAO DE PROVAS, EDITOR 
DE TEXTOS,RAM TOPER , SUB-ROTINAS 
EM CASSETTE, CHAINING PROGRAMAS, 
CONTANGO OS BYTES DAS LINHAS, DO 
PROGRAMA, DAS MA T R I Z E S , ECONOM I Z AN 
DO MEMORIA, ETC... ETC... 

CR$ 4.800,00 

45 PROGRAMAS 

ARQU I VOS , EST OQUE , PLANO CONTABIL , 
AGENDA TELEFONICA, INVASORES.APAGUE 
A TRILHA, CAQA AO PATO, JOGO DA VE 
LHA, FORCA, DADO, TABELAS , TABUADAS, 
CONVERSAO DE COORDENADAS, MEDIA, FI 
BONACCI , PROGRESSAO , BIORRITMO , RE 
NUMERADOR DE LINHAS EM CODIGO, ETC. 

7? EDIQAO cr$ 4.000,00 

L J 



MICRON 

ELETRONICA COMERCIO E INDUSTRIA LTDA 
Av. S Joao "4 Telefone 22 4194 S. Jose dos Campos 
Est. de Sao Paulo 



Troco, vendo, compro PROGRAMAS PARA TK, CP 200, NE, 
TIMEX, SINCLAIR. Fone: 521*5103 ou escreva para obter rela- 
gao de programas dispom'veis Josd Bisio/i S9. Rua Dr. Samuel de 
Castro Neves , 72 - apto. 33 — SP - CEP 04726. 

Vendo PROGRAMAS PARA TK-82C EM LINGUAGEM DE 
MAQUINA. Varios pregos ou fita com 10, por CrS 30.000,00. 
Tenho uma lista que inclui: Krazy Kong, Xadrez, Labirinto e mui- 
tos outros. Contatar: Josd Antonio , Rua Conde de Bonfim, 912/ 
501. Tijuca, RJ. CEP 20530, ou pelo telefone : (021) 2584537. 

VENDO CP-200 com 12 fitas incluindo aplicativos, ainda na 
garantia. Valor: Cr$ 200.000,00. Tratar com Mauricio Capeleiro , 
no telefone (081) 3414779 ou pela Caixa Postal 4068, Recife, 
PE. 

Vendo TK-82 COM EXPANSAO DE 16K ou troco por TK-85. 
Tita Movadab — telefone: (01 1) 825-0866 (SP) a partir das 19 hs. 

Se seu problema 6 PROGRAMA PARA SEU TK, procure-me. 
Tenho o programa que voc£ quer. Informapoes com Mauricio 
Xavier, no telefone 493.3322 - Av. Maria Cun ha Aguiar, Rua 
Particular, 68 — Santo Amaro. 

Troco ou vendo PROG RAM AS para os micros ZX -SPECTRUM/ 
81; TK-82/85 e CP200. Possuo o Galactica, kons, Air-Defense, 
Combat e muitos outros. Os interessados devem comunicar-se 
com Eduardo Medeiros. Rua Eliseu Guilherme, 1076 — Sumarti. 
Ribeirao Preto, SP - CEP 14100 ou pelo Tel. (016) 625-5796. 

Vendo NEZ 8000, EXPANSAO 16K, pouco uso. Livro "45 
Programas para TK82-C e NEZ 8000". Fone: (021) 393.9523, 
a noite com Rainer Schatzmayr. 

Gostaria de entrar em contato com USUARIOS DO TK, que 
tenham interesse em programas na 2rea m^dica. Luiz Alberto Loss. 

R. J. de Castilhos, s/n9. Nova Roma - 95250 - Antonio Prado, 
RS. 

SINCLAIR CLUB - Gostari'amos de intercambiar programas, 
livros, dicas de programagao e assuntos afins, com usu^rios dos 
sistemas SINCLAIR e similares compativeis (TK-82, 83 e 85; CP- 
CP-200; ZX 81 , etc.). Cartas para SINCLAIR CLUB - Caixa Pos- 
tal 191, Sao Bernardo do Campo, SP. CEP 09700. Envie Cr$ 45,00 
em sSlos para receber lista de programas. 

Compro PROGRAMAS PARA TK82-C, especialmente jogos 
(em fitas ou em listagens). Interessados, enviar relapao dos progra- 
mas dispomveis para: Roberto Gibel/o. Rua Cel. Joviniano Bran- 
dao , 459 - Mooca, SP. CEP 03127. 

Desejo TROCAR PROGRAMAS (Jogos, Sub-rotinas, Dicas, 
etc, para TK e CP 200). Telefone (Oil) 240-1883, fa/ar com 
Ernesto Mathiason. 

Troco PROGRAMAS ESCRITOS para TK-82C (Basic ou 
Assembly), principalmente jogos. Claudio Alves de Lima. Rua 
Chicago, 33 — 04564, Sao Paulo, SP. 

RADIOAMADOR. Vendo Interface e programa para decodifi- 
car telegra^ia para o seu TK-82C, TK-85 e Sinclair ZX81. Infor- 
magoes com Renato Strauss. PY2-EMI. Rua Cardoso de Almeida, 
654/32 - 05013, Sao Paulo, SP. 

VD TK82-C mais 16 K, Joystick e fitas com 40 jogos importa- 
dos. T ratar com Fernando A. Morales Castro no telefone: 63-21 55. 

\ J 
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QUEBRA-CABEQA 



•ft 

MENSA 

International 



EStemSS: O CAPITAO MACHISTA 




0 problema proposto a seguir 6 uma variante do Problems de 
Josephus. Diz uma estbria, que Josephus estava com outros 40 ju- 
deus, em uma caverna e que deveriam todos morrer para nao se- 
rem jogados aos leoes pelos romanos. Como ele nao queria mor- 
rer de nenhum modo, colocou todos os judeus em urn enorme 
circulo e estipulou que contaria, de tr£s em trbs, a partir dos ju- 
deus. Aqueles em que fosse caindo esse numero, seriam mortos. 
Josephus colocou-se na 16? posigao e seu melhor amigo na 31? 
posigao. Dos 41 judeus existentes, restaram apenas os dois. 0 pro- 
blema abaixo, & bem mais simples que o de Josephus. 

"Num banco, estao 6 mu/heres e 7 homens, sendo o coman- 
dante um dos homens. Devi do a um vazamento, o comandante 
chega a conc/usao de que para o barco nao afundar, nele deverao 
permanecer apenas 7 pessoas. Em outras pa/avras, seis deverao 
servir de comida aos tubardes. 

Para evitar problemas com a escolha das pessoas que seriam sa - 
crificadas,uma das mu/heres, ferrenha feminists, propos que os 
passageiros fossem dispostos numa circunferSncia, sendo que, ao 
I ado de cada mulher, haveria sempre dois homens. O capitao esco- 
Iheria um numero e comeqaria a con tar no ci'rcu/o, a partir de 
uma das pessoas. Aquele que caisse no numero esco/hido, seria jo- 
gado ao mar e a contagem do mesmo numero iniciar-se-ia a partir 
da pessoa seguinte. 

0 capitao, um ferrenho machista, pensou um pouco, fSz um 
rSpido programs em seu TK83, ocupando apenas 1 k Byte de 
RAM e aceitou a sugestao. Um dos homens, jovem engenheiro, 
temendo que o capitao escolhesse o numero 2 {dois) e iniciasse 
a contagem por sua mulher, fSz questao que a contagem come - 
Qasse por ele. O capitao esco/heu um numero, contou-o por 6 ve- 
zes na circunferSncia — que a cada vez ficava menor e conseguiu 
ser o unico homem em seu barco". 

0 Quebra-Cabega consiste em obter um programa para o TK 
que, ocupando menos de 1 kByte de RAM, encontre o menor nu- 
mero que o capitao pode ter escolhido. 




AS IDADES 
DAS TRES 
FILHAS 



Atd a data de fechamento da Microhobby n9 6, recebemos 
apenas trfis solugoes do Quebra-Cabega "As Idades das Trfis Fi- 
Ihas". Felizmente elas estavam corretas. Esse problema, como jS 
dissemos na edigao n9 4, 6 bem antigo e surpreendeu-nos o fato 
de recebermos apenas trSs solugoes. Provavelmente, o que muitos 
leitores nao perceberam foi a import£ncia da ultima dica: 

"A mais velha danga ballet". 

0 essencial desta afirmagao esta no fato de existir uma mais 
velha. 0 Josb Hiterio, tendo observado muito bem isso, solucio 
nou o problema com menos de 2 kBytes de RAM, por isso esco 
Ihemos a sua solugao para publicar. Abaixo, transcrevemos sua 
carta. Recebemos mais duas cartas que nos foram enviadas por 
Gilberto Gamer e Carlos Eduardo Carvalho. 

"Caros amigos da Microhobby, resolvi encarar o quebra-cabe 
ga proposto por voc£s na revista n9 4. A maneira que encontrei 
para soluciona-lo, foi atravbs da "eliminagao"; pois, existem pou- 
cas possibi I idades de o produto de trGs numeros inteiros positivos, 
ser 36 e depois, a cada pista fornecida ao matem^tico B, surge 
uma maneira de descartar algumas destas possibilidades. Como eu 
tenho confianga na palavra de um matem^tico (dentro de uma 
certa I6gica, S claro! ) , nem passou pela minha cabega a idbia de 
que esse problema nao teria solugao. E o programa listado abaixo, 

mostra isso. Vejam! . . . ..... . . _ 

1 Jort Hilirto da Cruz 



a X WM IDADES D«S TRES IRMA 

a uose hilrrio dr cruz 

3 FAST 

5 LET H-O 
10 LETT N=0 
IS DIM A(9) 

20 DIM B(9» 

30 DIM C<9> 

35 DIM 5C9I 

40 FOR I»1 TO 3 

4.3 FOR w»«l TO 6 

50 LET K = I NT (36x(I+J>> 

55 IF I»J»K>36 AND I I < »*J AND U 
<-K> TMEN GOSUB 125 
50 NEXT kJ 
53 NE XT I 
70 FOR 1.1 TO M 
75 FOR U-l TO M 

50 IF S(I)=S(U) AND Z < >«J TMEN 
GOSUB 155 
55 NEXT J 
90 NEXT I 
95 FOR 1=1 TO N 

100 IF (R(Z) > B < I ) AND R(I)>C(I) 

) OR (B(I)>R(I> AND B(I)>C(I)> O 
R <C(X)>R<I) ANO C(X.' >5(1) > TMEN 
GOTO 113 
110 NEXT I 

113 PRINT "COM CERTE2A AS IDRDE 

3 3AO: **; A I X> ; " ANOS 

B(I);" RNOS E", ,C (I) ; 

120 STOP 
125 LET M =M ♦ 1 
130 LET S t M ) = I ♦U ♦K 
133 LET A CM) =1 
140 LET 5 CM) *U 
143 LET C CM) =K 
150 RETURN 
155 LET N-N+l 
160 LET R (N) =A (I) 

163 LET 5 (N) =B (I) 

170 LET C (N) =C < I) 

175 RETURN 
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^PROGRAMAS DO LEITOR 

O ESQUIADOR 




Edson Mikio Yoshida 
Nelson Murassaki 



Este 6 um programa de 2k, para ser ro- 
dado em SLOW utilizandose um pouco 
de linguagem de m£quina, possibilitando 
assim, o aumento da velocidade do jogo. 

Basicamente, voce controla um Esquia- 
dor (letra H) que vai descendo uma pista 
de neve e encontra, na sua frente, v£rios 
obst£culos. Enquanto ele desce, nao 6 
possi'vel alterar sua trajetdria, por£m ao se 
encontrar com um obst£culo, ele para e, 
a partir dai, podemos escolher para que 
lado dirigir a trajetdria, 5 (para a esquer* 
da) e 8 (para a direita). Note que, se o Es 
quiador nao puder se movimentar (se o 
obstaculo nao permitir), ele estar£ fadado 
ao cruel destino de ser congelado. Digi- 
tando-se a letra "O" aparecerao quantos 
metros voce percorreu. 
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Ultimo detalhe e aviso: "Se voce for 
em uma diregao, nao poder£ voltar atr^s, 
pois a neve 6 fofa e o pobre coitado nao 
tern folego para andar por cima de neve 
j£ pisada." 



1 PCM ECRND TRST ) 8 ;9CN * CHR 
• • OOSUB STAN 

a pim 

3 RPNO 

<4 LETT Z=UAL ^©O’^PEEK 16396* 
25© *PEEK 16397 
3 CL 3 

6 LET S*UAL -O’- 

7 LET X*yRL -'ll*' 

© LETT Y-URL *12" 

9^t Mid).-! mm 

ta> mm 

ct hh wmm m 

ET M* (4.) ■ ■ 

"let hi (?) «"■ mmm 

l4 » CT «i" * , |BB * * 

is *••■ ■ m mm 





1© LET A = INT (RNOlflUPI/PI 

19 LET 5-54PI/PI 

S© PRINT RT X « Y; *’H** 

SI LET U*PEEK <Z + 24-+Y> 

22 IE U<>© THEN iOTO 2© 

23 LET U-U5R 16514. 

24. PRINT AT 

a© GOTO 15 
2© LET PS 3 INKEY % 

27 ir PS*’"' THEN GOTO 26 

20 ir PS*"©’’ AND PEEK 1Z+Y> *© 
THEN LET Y.Y-PI/PI 

29 ir PS*’’©'- PND PEEK <Z+2*Y) ■ 
© THEN LET YsY^PI/PI 

3© IE PS-’O” THEN GOTO 32 

31 GOTO 10 

32 PRINT PT 6.26. 5; AT 1,28, '«C 
TRO© " 

33 OOTO 4. 



MEMORIP OCUPODR 



93© BYTES 



Vamos apresentar aqui algumas suges- 
toes para aumentar a velocidade dos seus 
programas e economizar espago de memd- 
ria. 

AUMENTANDO A VELOCIDADE ~ 

Planeje seu programa de maneira preci- 
se e eficiente. Escreva cuidadosamente a 
algoritmo e/ou fluxograma. Estude e ata- 
que cada problema antes de digitar o pro* > 
grama. 

Use varidveis no lugar de constantes, 
quando estas sao usadas muitas vezes. 0 
Applesoft leva muito mais tempo para 
converter uma constante para a sua repre- 
sentagao interna do que para ler o conteu- 
do de uma variavel. 

Use apenas NEXT, sem o nome da va- 
riavel de controle. Assim o computador 
nao tern que verificar se a variavel 6 a cor- 
reta. 

Coloque linhas frequentemente usa- 
das no inicio do programa, jd que o 
Basic inicia a procura de uma linha 
do imcio da memdria de programs* 
gao. 

Faga com que seu programa execute, 
de vez em quando, um F R E(0) , que apaga 
as informagoes desnecessdrias da memdria 
do computador, melhorando sensivelmen- 
te o tempo de acesso aos dados armazena- 
dos em varidveis alfanumdricas. 

ECONOMIZANDO MEMpRIA ~ 

Renumere seus programas de 1 em 1, 
comegando pela linha 0 ou 1. Dessa for- 
ma, os numeros nos comandos GOTO e 
GOSUB, que sao armazenados como ca- 
deias de caracteres, serao menores, usan- 
do portanto menos memdria 

J3 que o Applesoft nao guarda mais do 
que as duas primeiras letras do nome de 
uma var^vel, nao ha razao para escrever- 
mos. por exemplo.CONTADOR emvezde 
CO; use, portanto, nomes de apenas uma 
letra e, se necessario, de duas. 

Utilize os dois pontos (":"), de tal for- 
ma que haja menor numero de linhas em 
seu programa. Cada nova linha iniciada no 
Applesoft ocupa 5 bytes de memdria, 
aldm do conteudo da prdpria linha. 

Sempre use DIM, dimensionando as 
matrizes de forma a ocuparem o menor 
espago possi'vel, e utilizando sempre o ele* 
mento de 1 'ndice zero. 

Quando seu programa estiver funcio- 
nando bem, apague todos os REMs, que 
sao as linhas de programagao que, em ge- 
ral, ocupam o maior espago na memdria. 
Guarde sempre uma versao do programa 



